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前 言 


随 着 Intemet 应 用 的 普及 ， 社 会 对 Web 应 用 程序 开发 人 员 的 需求 越 来 越 多 。 为 了 适应 
信息 技术 的 发 展 和 社会 的 需求 , 不 少 高 校 开 始 在 计算 机 及 相关 专业 开设 Web 程序 设计 方面 
的 课程 。 根 据 教 学 实际 需要 ， 再 结合 近年 来 在 Web 应 用 开发 和 Web 教学 中 的 经 验 ， 笔 者 
编写 了 本 教材 。 

Web 应 用 开发 的 基础 是 网 页 , 在 此 基础 上 结合 Web 服务 器 端的 数据 访问 技术 以 及 客户 
浏览 器 端的 动态 交互 技术 实现 Web 应 用 的 动态 交互 性 。 在 服务 器 端 技术 中 使 用 比较 普遍 的 
有 ASP、JSP、PHP 等 技术 。 考 虑 到 微软 ASP 应 用 开发 环境 具有 简单 易学 的 特点 ， 因 此 ， 
本 书 选择 用 ASP 技术 作为 服务 器 端的 开发 环境 进行 介绍 , 客户 浏览 器 端的 动态 交互 处 理 则 
选用 广泛 采用 的 JavaScript 脚本 语言 进行 介绍 。 另 外 ， 由 于 XML 技术 在 客户 端 和 服务 器 端 
的 应 用 开发 中 都 得 到 了 广泛 使 用 ， 因 此 ， 本 书 对 XML 技术 及 AJAX 技术 的 应 用 也 进行 了 
重点 介绍 。 

全 书 共 11 章 ， 第 1 章 介 绍 ASP 编程 基础 ， 重 点 是 让 读者 熟悉 Web 环境 的 搭建 ， 了 解 
ASP 程序 的 基本 特点 ; 第 2 章 介 绍 HTML 语言 ， 让 读者 了 解 常用 HTML 标记 的 使 用 ; 第 3 
章 介绍 VBScript 语言 , 它 是 服务 端 推荐 采用 的 脚本 语言 ;第 4 章 介 绍 ASP 内 置 对 象 的 使 用 ; 
第 5 章 介绍 ASP 访问 数据 库 ; 第 6 章 介绍 JavaScript 脚本 语言 ;第 7 章 介绍 层 登 样式 表 CSS; 
第 8 章 介 绍 DHTML 编程 ; 第 9 章 简要 介绍 XML 的 技术 与 应 用 ; 第 10 章 介绍 AJAX 技术 ; 
第 11 章 给 出 了 网 络 教学 的 几 个 综合 应 用 实例 ， 以 培养 读者 对 Web 程序 设计 技术 的 综合 应 
用 能 力 。 本 课程 是 一 门 实践 性 较 强 的 课程 ， 不 仅 要 求学 生 掌 握 基 本 理论 、 基 本 技术 和 基本 
方法 ， 更 重要 的 是 使 学 生 具 有 较 强 的 实际 操作 应 用 能 力 。 课 程 的 实验 部 分 安排 了 丰富 的 内 
容 供 教师 选用 ， 并 且 每 章 的 后 面 均 配 有 习题 。 

本 书 是 作者 多 年 来 教学 和 软件 开发 经 验 的 总 结 。 作 者 对 书 中 内 容 进行 了 精心 的 设计 和 
安排 ， 按 照 由 浅 入 深 、 循序 渐进 的 原则 进行 组 织 ， 力 求实 现 内 容 丰 富 、 结 构 清晰 。 书 中 程 
序 样 例 大 多 简短 实用 ， 易 于 教师 教学 使 用 和 读者 学 习 ; 书 中 所 有 代码 均 经 过 调试 ， 大 部 分 
案例 来 源 于 网 络 教 学 平台 的 开发 实践 ， 具 有 较 大 的 实际 应 用 价值 。Web 编程 的 一 个 关键 点 
是 能 很 好 地 选择 和 使 用 技术 , 本 书 在 对 Web 编程 的 客户 端 和 服务 器 端的 理论 与 技术 进行 归 
纳 整理 的 同时 ， 注 意 技术 的 融合 与 运用 ， 使 读者 在 一 个 渐进 的 学 习 过 程 中 把 握 这 些 技术 的 
特点 ， 并 应 用 于 实际 项 目的 开发 中 。 

本 书 不 仅 适 合 教学 ， 也 适合 使 用 Web 应 用 开发 的 用 户 学 习 和 参考 。 阅 读本 书 ， 并 结合 
上 机 实 训 进 行 练习 ， 就 能 在 较 短 的 时 间 内 基本 掌握 Web 应 用 开发 的 基本 技术 。 另 外 ， 本 书 
为 教师 配 有 教学 课件 ， 并 提供 配 有 实例 的 源 程序 ， 需 要 的 教师 可 登录 华东 交通 大 学 的 网 络 
教学 网 站 (http://cai.ecjtujx.cn/) 下 载 。 

本 书 第 1、2 章 由 齐齐哈尔 大 学 的 赵 硕 老师 编写 , 第 3 一 11 章 由 华东 交通 大 学 丁 振 凡 教 
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出 了 不 少 宝贵 意见 。 感 谢 研究 生 吴 根 斌 仔细 阅读 了 本 书 ， 并 对 书 中 习题 进行 了 解答 。 由 于 
编者 水 平 所 限 ， 玻 漏 和 错误 之 处 在 所 难免 ， 奶 请 读者 批评 指正 。 


2010 年 10 月 于 南昌 


章 ，ASP 编程 基础 
1.1 ”Web 基础 知识 
1.1.1 Web 工作 原理 
1.1.2 Web 页 与 Web 站 


1.3.2 ”启动 和 停止 IS … 
1.3.3 配置 IS 
1.4 _ ASP 程序 初步 介绍 .. 
1.4.1 简单 示例 .… 
1.4.2 ASP 脚本 语言 设 定 


1.4.3 ”服务 器 端 包 含 的 文件 .. 


第 过 可 :NEWE 竹下 让 全 生生 10 


2.1 HTML 概述 
2.1.1 HTML 文档 结构 .…. 


2.1.2 常用 HIML 编辑 工具 . 


2.2.1 设置 body 属性 .… 
2.2.2 段落 格式 化 .… 
2.2.3 字符 格式 化 … 


2.3.1 创建 基本 表格 
2.3.2 表格 设置 
2.4 在 网 页 中 加 入 多 媒体 
2.4.1 ”使 用 图 像 … 
2.4.2 ”使 用 字幕 和 背景 音 


A 
2.5.1 框架 网 页 的 基本 结构 .. 


IV: Web 编程 实践 教程 


2.6.1 理解 超 链接 和 路 径 . 
2.6.2 ”创建 文件 链接 
2.6.3 创建 锚 点 链接 


2.7.1 表单 处 理 概述 
2.7.2 INPUT 标记 型 表单 控件 的 使 用 
2.7.3 其 他 表单 控件 


So MBO 35 
3.1 VBScript 概述 
3.2 ”VBScript 的 数据 表示 .… 

3 Voiet 的 煌 所 天 区 36 
3.2.2 VBScript 的 常量 、 变 量 与 数组 变量 . 
3.2.3 VBScript 运算 符 
3.3 ” VBScript 的 流程 控制 语句 .. 
3.3.1 并 语句 
3.3.2 ”Select Case 语句 .. 
3.3.3 ”循环 语句 
3.4 VBScript 的 过 程 定义 与 调用 .. 
3.4.1 Sub 过 程 及 其 调用 
3.4.2 Function 过 程 及 其 调用 .… 
3.5 _ VBScript 中 的 内 部 函数 
3.5.1 
352 
3.5.3 日 期 和 时 间 函 数 . 
3.5.4 数学 函数 .… 
3.5.5 检验 函数 .… 
3.5.6 ”输入 与 输出 函数 


4.1 Request 对 象 .… 
4.1.1 Form 集合 .. 


4.2 


4.3 


4.4 


4.5 


:2 


5:3 


5.4 


4.12 QueryString 集合 58 
4.1.3 ”Cookies 集合 
4.1.4 ServerVariables 集合 
Response 对 象 
4.2.1 Response 对 象 的 属性 
4.2.2 ”Response 对 象 的 方法 
4.2.3 Response 对 象 的 数据 集合 
Session 对 象 
4.3.1 Session 对 象 的 属性 . 
4.3.2 Session 对象 的 方法 . 
4.3.3 Session 对 象 的 事件 . 
Application 对 象 .…. 
4.4.1 Application 对 象 的 方法 
4.4.2 Application 对 象 的 事件 
4.4.3 Globalasa 文件 
Server 对 象 
4.5.1 Server 对 象 的 属性 
4.5.2 Server 对 象 的 方法 


ASP 访问 数据 库 .…… 
结构 化 查询 语言 SQL 
5.1.1 SQL 命令 的 基本 构成 … 
5.1.2 SQL 查询 
5.1.3 其 他 SQL 语句 
ADO 对 象 模型 简介 . 


5.2.2 ADO 对 象 和 数据 集合 

用 Connection 对 象 连接 数据 库 - 
Onotiont 对 苯 的 党 用 民 性 各 为 法 ie bn i 89 
5.3.2 ”连接 数据 库 
5.3.3 用 Connection 对 象 执行 SQL 语 扣 
5.3.4 ”Connection 对 象 的 数据 集合 
5.3.5 ”Connection 对 象 的 事务 处 理 
用 Recordset 对 象 访问 数据 库 
5.4.1 Recordset 对 象 的 创建 
5.4.2 ”记录 集 游标 及 移动 方法 .… 


“VI。 Web 编程 实践 教程 


3 二 双 隐 下 丙 册 真人 99 
5.4.4 记录 集 的 分 页 显示 
5.4.5 ”记录 的 添加 与 编辑 修改 .… 


5.5.2 ”Command 对象 的 常用 方法 
5.5.3 ”Command 对 象 的 数据 集合 
5.5.4 通过 Command 对 象 调用 存储 过 程 
本 章 小 结 .…. 
习题 ss 


第 6 章 JavaScript 脚本 语言 
6.1 JavaScript 的 基本 语法 成 分 
6.1.1 在 网 页 中 插入 JavaScript 代码 . 

6.1.2 ”数据 类 型 与 变量 .pp 


6.2 ”程序 流程 控制 语句 … 
6.2.1 条 件 语句 
6.2.2 ”循环 语句 

63， 从 年 对 学 0 
6.3.1 String 对 象 .. 
6.3.2 ”Aray 对 象 … 
6.3.3 Date 对 象 … 
6.3.4 Math 对 象 … 

3 = 
6.4.1 函数 的 定义 . 
6.4.2 函数 的 调用 . 

6.5 用 户 自 定 义 对 象 
6.5.1 自 定义 对 象 创建 方式 
1 133 
6.5.3 定义 对 象 属性 


第 7 章 ， 层 人 样式 表 CSS.… 
7.1 样式 表 的 定义 与 引用 .… 要 
A 3 Ee 


7.3.3 ”颜色 和 背景 属性 -. 
7.3.4 列表 属性 层 
2) Re 149 
7.3.6 ”定位 与 布局 属性 .… 


第 8 章 DHTML 编程 
8.1 浏览 器 对 象 模型 
8.1.1 window 对 和 象 … 
8.1.2 document 对 象 . 
8.1.3 location 对象 … 
Bi Ne A 
8.1.5 extemal 对 象 ..… 
8.1.6 ”navigator 对 象 .. 
8.1.7 screen 对 象 
8.2 JavaScript 的 事件 处 理 加 
2 er 0 by 1 
8.2.2 常见 事件 一 览 
8.2.3 document 的 常用 事 人 
8.2.4 表单 处 理 的 常用 事件 
8.2.5 表单 中 的 控件 
本 章 小 结 .…… 
习题 .… 
第 9 章 XML 技术 与 应 用 .… 
9.1 
9.2 XML 文档 对 象 模型 
9.2.1 DOMDocument 对 象 … 
9.2.2 XMLDOMNode 对 象 … 
9.2.3 XMLDOMNodeList 对 象 … 
9.3 XML 文档 的 显示 处 理 
eh SD CT er 193 
9.3.2 ”使 用 Xpath 查找 结 点 
9.3.3 利用 XSL 实现 显示 . 
9.4 在 服务 器 端 访问 和 处 理 XML 文档 201 


‘VIN: Web 编程 实践 教程 


95 在 客 户 油 访问 和 处 理 XM 光 和 oss 
9.5.1 通过 脚本 装载 和 处 理 XML 文档 .. 


习题 sats 


第 10 章 AJAX 技术 
10.1 什么 是 AJAX 
10.2 ” XMLHttpRequest 对 象 的 使 用 
10.2.1 创建 XMLHttpRequest 对 象 
10.2.2 XMLHttpRequest 对 象 的 属性 
10.2.3 ” XMLHttpRequest 对 象 的 方法 
10.2.4 在 Web 服务 器 端 使 用 XMLHttpRequest 对 象 … 
10.3 ”AJAX 应 用 举例 
10.3.1 样 例 1 一 一 网 络 考试 中 避免 并 发 交卷 的 处 理 .. 
10.3.2 ” 样 例 2 一 一 作品 的 投票 处 理 .. 
10.3.3” 样 例 3 一 一 页 面 元 素 间 的 关联 处 理 
10.4 ”在 AJAX 中 使 用 JSON . 
10.4.1 JSON 的 具体 形式 
10.4.2 JSON 数据 格式 解析 .. 
玉音 小 缚 ab 


第 11 章 ”网络 教学 综合 应 用 实例 .…. 
11.1 网 上 答疑 子 系统 …..….…. 
11.1.1 数据 库 表格 设计 .… 
11.1.2 ”辅助 包含 文件 … 
11.1.3 学 生 端的 设计 … 
11.1.4 教师 端的 设计 
11.2 基于 XML 的 单元 自 测 应 用 . 
11.2.1 功能 概述 
11.2.2 测试 试卷 的 XML 表示 . 
11.2.3 ”考试 解答 界面 的 生成 及 显示 处 理 
11.2.4 考试 的 解答 记录 、 交 卷 评 分 及 答案 对 比 的 显示 . 
11.3 ”网 络 课件 导航 菜单 的 设计 .…. 
11.3.1 导航 菜单 的 设计 要 求 … 
11.3.2 基于 XML 的 导航 菜单 设计 … 
11.4 网 络 考试 系统 
11.4.1 考试 界面 布局 


目录 .IX. 


OO 57 
和 259 


11.4.4 答题 卡 显 示 处 理 程序 . 
11.4.5 交卷 评分 显示 处 理 程序 . 


第 1 章 ASP 编程 基础 


1.1 Web 基础 知识 


1.1.1 Web 工作 原理 


Web 全 称 为 World Wide Web， 缩 写 为 WWW。Web 有 许多 译名 ， 如 环球 网 、 万 维 网 、 
全 球 信 息 网 等 。 目 前 尚 无 对 Web 形成 一 致 的 定义 ， 简 单 地 说 ，Web 是 Intemet 提供 的 一 种 
服务 ， 通 过 它 可 以 访问 分 布 于 Intemet 主机 上 的 信息 资源 ， 它 是 存储 在 全 世界 Intemet 计算 
机 中 、 数 量 巨大 的 链接 文档 的 集合 。 

Web 以 客户 机 /服务 器 模式 运行 。 信 息 资源 以 页 面 形式 存储 在 Web 服务 器 上 ， 用 户 通 
过 客户 端的 Web 浏览 器 向 Web 服务 器 发 出 查询 请 求 ，Web 服务 器 根据 客户 端 请 求 的 内 容 
做 出 响应 ， 并 将 存储 在 服务 器 上 的 某 个 页 面 发 送 给 客户 端 ; Web 浏览 器 对 收 到 的 页 面 进 行 
解释 并 将 页 面 显示 给 用 户 。 浏 览 器 与 Web 服务 器 间 的 信息 传输 采用 超 文 本 传输 CHTTP) 
协议 ， 如 图 1-1 所 示 。 


HTTP 请 求 
| 一 一 一 Web 服务 器 


HTTP 响应 
图 1-1 Web 的 工作 原理 

Web 服务 器 通常 是 指 安装 了 服务 器 软件 的 计算 机 ， 常 见 的 Web 服务 器 软件 包括 
Microsoft Internet Information Server (IIS) 、 Microsoft Personnal Web Server (PWS) 和 Apache 
HTTP Server 等 ， 常 用 的 Web 浏览 器 软件 有 Netscape Navigator (NN) 、Microsoft Internet 
Explorer (IE) 和 Mozilla Firefox (火狐 )〉 等 。 

URL 即 统一 资源 定位 符 ， 是 一 种 唯一 地 标识 Internet 上 计算 机 、 目 录 和 文件 的 位 置 的 
命名 规则 。URL 用 于 指定 获得 Intemet 上 资源 的 方式 和 位 置 ， 通 常 也 称 为 URL 地 址 、 网 站 
地 址 或 网 址 ， 其 一 般 形式 如 下 : 

< 方式 >://< 主 机 名 >:< 端 口 >/< 目 录 >/…/< 文 件 名 > 

其 中 : 

口 “< 方式 > 指定 访问 该 资源 所 使 用 的 Intemet 协议 ， 常 用 形式 有 http( 超 文本 传输 协 

议 )、ftp (文件 传输 协议 ) 、mailto( 电 子 邮件 地 址 ) 、news (网络 新 闻 组 ) 、telnet 
(远程 登录 服务 ) 和 fle( 本 地 文件 ) 等 。 

口 < 主机 名 > 指定 Web 服务 器 的 人 P 地 址 或 域名 地 址 。IP 地 址 是 唯一 标识 网 络 上 某 一 
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主机 的 地 址 ， 它 将 计算 机 标识 为 一 个 32 位 地 址 ， 可 以 用 带 英 文句 点 的 十 进 制 数 来 
表示 。 域 名 地 址 也 称 为 DNS 地 址 ， 由 4 个 部 分 组 成 ， 常 用 形式 为 “机 器 名 .单位 名 . 
单位 类 别 . 国 别 ”。 例 如 ， 华 东 交 通 大 学 的 WWW 服务 器 地 址 为 www.ecjtujx.cn。 
【注意 】localhost 是 一 个 特殊 的 名 称 ， 它 代表 本 机 地 址 。 

口 ”< 端口 > 指定 Web 服务 器 在 该 主机 上 所 使 用 的 TCP 端口 ， 默 认 端 口 是 80。 该 端口 

通常 不 需要 指定 ， 只 有 当 Web 服务 器 不 使 用 默认 端口 时 才 需 要 指定 。 

口 < 目录 > 是 Web 服务 器 上 信息 资源 相对 于 Web 服务 器 的 根 目录 或 虚拟 目录 所 处 

目录 路 径 ， 每 一 级 目录 以 正 斜 杜 (/) 隔 开 。 

口 ”< 文件 名 > 由 基本 文件 名 和 扩展 名 两 部 分 组 成 ， 如 index.htm。 

以 下 是 URL 的 一 些 例子 : 

http://www.sina.com.cn/ 

http://cai.ecjtu.jx.cn/java/default.htm 

ftp://ftp.w3.org/pub/www/doc 


本 


1.1.2 ”Web 页 与 Web 站 点 


Web 页 通常 称 为 网 页 ， 它 一 般 由 HIML 文件 组 成 , 其 中 包含 相关 的 文本 、 图像 、 声 音 、 
动画 、 视 频 及 脚本 命令 等 ， 位 于 特定 计算 机 的 特定 目录 中 ， 其 位 置 可 以 根据 URL 确定 。 按 
照 Web 服务 器 响应 方式 的 不 同 ， 可 以 将 Web 页 分 为 静态 网 页 和 动态 网 页 。 

Web 站 点 提供 Web 服务 访问 的 地 址 。 一 般 的 Web 站 点 由 一 组 相关 的 HTML 文件 和 其 
他 文件 组 成 ， 这 些 文件 存储 在 Web 服务 器 上 。 当 用 户 访问 一 个 Web 站 点 时 ， 该 站 点 中 有 

-个 页 面 总 是 被 首先 打开 ， 该 页 面 称 为 首页 或 主页 ， 如 index.html。 


1.2 ASP 简介 


ASP 全 称 为 Active Server Pages， 是 一 种 由 Microsoft 公司 开发 的 服务 器 端 脚 本 语言 运 
行 环境 ， 它 可 以 结合 HTML 语言 和 ActiveX 组 件 建立 动态 、 交 互 、 高 效 的 Web 服务 器 端 应 
用 程序 。 当 一 个 用 户 浏览 器 从 Web 服务 器 请 求 一 个 ASP 网 页 时 , Web 服务 器 会 将 这 个 ASP 
文件 发 送 给 Web 服务 器 的 ASP 引擎 , ASP 引擎 将 该 ASP 网 页 中 所 有 的 服务 器 端 脚本 (<% 
和 %> 之 间 的 代码 ) 进 行 处 理 , 并 将 输出 结果 转换 成 HIML 代码 ,然后 将 处 理 后 的 完整 HTML 
代码 发 送 给 用 户 浏 览 器 。ASP 的 工作 原理 如 图 1-2 所 示 。 在 ASP 程序 中 可 以 通过 ActiveX 
Data Object 对 象 实现 对 数据 库 的 访问 处 理 。 
从 软件 的 技术 层面 看 ，ASP 具有 如 下 特点 : 
(1) 无 须 编译 。ASP 脚本 与 HIML 集成 一 体 ， 可 直接 由 ASP 引擎 解释 执行 。 
(2) 易于 生成 。 使 用 常规 文本 编辑 器 即 可 进行 ASP 程序 代码 的 编写 ， 同 时 也 可 以 使 
用 FrontPage 和 Dreamweaver 等 网 页 制作 工具 。 
(3) 独立 于 浏览 器 。ASP 脚本 在 站 点 服务 器 端 执行 ， 用 户 端的 浏览 器 不 需要 支持 它 。 
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(4) 面向 对 象 。 在 ASP 脚本 中 可 以 方便 地 引用 系统 组 件 和 ASP 的 内 置 组 件 ， 另 外 还 
能 通过 定制 ActiveX 服务 器 组 件 来 扩充 功能 。 

(5) 与 任何 ActiveX Scripting 语言 兼容 。 除 了 可 使 用 VBScript 和 JScript 语言 进行 设 
计 外 ， 还 可 通过 Plug-in 的 方式 使 用 由 第 三 方 所 提供 的 其 他 Scripting 语言 。 

(6) 源 程 序 码 不 会 外 漏 。 由 于 ASP 在 服务 器 端 解释 执行 ， 在 客户 端的 浏览 器 上 看 到 
的 是 执行 后 的 结果 ， 所 以 开发 者 无 须 担 心 他 人 下 载 程序 代码 ， 从 而 增加 了 网 站 的 安全 性 。 

客户 端 浏览 器 
一 HITP 请求 


看 一 一 一 HTTP 响应 


ActiveX Data Object 


图 1-2 ASP 的 工作 原理 


1.3 IIS 的 安装 与 配置 
1.3.1 安装 IIS 


若 操作 系统 中 还 未 安装 IIS 服务 器 ， 可 打开 控制 面板 ， 然 后 单 击 “ 添 加 /删除 程序 ”， 
在 弹出 的 对 话 框 中 选择 “添加 /删除 Windows 组 件 ” 选 项 ， 在 Windows 组 件 向 导 对 话 框 中 
选中 “Internet 信息 服务 (IS) ” 复 选 框 ， 然 后 单 击 “下 一 步 ”按钮 ， 按 向 导 指 示 ， 即 可 完 
成 对 IS 的 安装 。 


1.3.2 ”启动 和 停止 IIS 

Intemet 信息 服务 简称 为 HS， 选 择 Windows 的 “开始 ”一 “所 有 程序 ”一 “管理 工具 ”一 
“Internet 信息 服务 (TS) 管理 器 ”命令 ,在 弹出 的 对 话 框 中 单 击 图标 即 可 启动 “Internet 
信息 服务 ”， 如 图 1-3 所 示 。 在 服务 器 已 启动 的 情况 下 ， 单 击 硬 图标， 则 停止 IS 服务 器 。 


1.3.3 配置 IIS 


yyy 


鼠标 右键 单 击 “ 默 认 Web 站 点 ”， 在 弹出 的 快捷 菜单 中 选择 “属性 ”命令 , 此 时 即 可 
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打开 “默认 网 站 属性 ”对 话 框 ， 如 图 1-4 所 示 。 在 该 对 话 框 中 可 完成 对 站 点 的 全 部 配置 。 


>E Internet 信息 服务 

文件 (E) ”操作 (A) ”查看 (WW 帮助 (H) 网站 。 [ISAPI 箱 先 器 | 主 目录 | 文档 | 目录 安全 性 | ;TTP 头 | 自 定义 错误 | 
人 一 四国 | 晖 国葬 贸 三 TO 
internet 信息 服务 奋 - 人 3 

日 otroorr et6r catsit 有 亚 地 址 加 ) 全 部 未 分 配 ) II 


i 二 ICP 端口 中 ‘80 
轩 

四- 默认 5MTP 虚拟 服务 器 村 连接 

EE 

回 保持 ITP 连接 四 
回忆 用 日 志 记 录 加 


活动 日 志 格 式 WW) 
3C 扩展 日 志文 件 格式 


[mm | | 


图 1-3 Intemet 信息 服务 (IIS) 管理 器 图 1-4 “默认 网 站 属性 ”对 话 框 
1. 配置 主 目录 
当 IIS 安装 后 ， 系 统 自动 创建 了 一 个 默认 的 Web 站 点 ， 该 站 点 的 主 目录 默 认为 Ci\ 
Inetpub\wwwroot。 单 击 “ 主 目录 ”标签 ， 切 换 到 “ 主 目录 ”选项 卡 ， 如 图 1-5 所 示 ， 在 该 
选项 卡 中 可 实现 对 主 目录 的 更 改 或 设置 。 

2. 设置 主页 文档 

单 击 “ 文 档 ” 标 签 ， 可 切换 到 “文档 ”选项 卡 ， 如 图 1-6 所 示 。 主 页 文档 是 在 浏览 器 
地 址 栏 中 只 输入 网 站 域名 , 未 指定 要 访问 的 网 页 文件 时 ，Web 服务 器 默认 提供 的 页 面 文件 。 
IS 默认 的 主页 文档 只 有 default.htm 和 defaultasp， 根 据 需要 用 “添加 ”和 “删除 ”按钮 ， 
可 为 站 点 设置 所 能 解析 的 主页 文档 。 


默认 网 站 属性 了 xd 
| 网 站 “| ISAPI 第 选 器 ] 主 目录 | 文档 “| 目录 安全 性 | MTP 头 | 自 定义 皇 误 TF 头 | 目 定义 错误 1 SF JET 
连接 允 诸 祁 时 的 内 容 坟 源 R | ITShrr kt 器 | 主 上 录 文 省 。 | 目录 安全 性 
OREM 的 目 某 而 | RUS 
口 另 一 各 计划 机 上 的 共享 pee | 
OA LD) -We 夭 加 四 
本地 路 径 C): [EN -Tr 回 Ea 
口 脚本 绕 裕 访问 思 回 记 录 访 问 虽 er Il 
回 读 取 @) 回 索 3 资 源 G) -TT BENN 
| Fe = 已 
际 共 而 用 程序 
人 A> 
E723 
应 用 程序 保护 tp: 。 | 中 民用 ) 
已 枉 忆 型] | AI | 和 
图 1-5 默认 网 站 的 主 目录 设置 图 1-6 默认 网 站 的 文档 设置 


3. 建立 虚拟 目录 

如 果 应 用 存储 在 Web 服务 器 的 磁盘 上 任意 一 个 路 径 下 ， 要 进行 Web 发 布 ， 可 以 建立 
一 个 虚拟 目录 ， 每 个 虚拟 目录 有 一 个 别名 ， 用 户 通过 浏览 器 访问 只 需 在 访问 相应 站 点 的 主 
机 名 和 目录 路 径 之 间 再 通过 斜 杠 符 隔 开 添加 指定 别名 ，Web 服务 器 就 会 根据 虚拟 目录 定义 
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的 实际 存储 路 径 提取 要 访问 的 资源 文件 ， 如 图 1-7 所 示 。 


图 1-7 在 Is 中 新 建 虚拟 目录 


在 默认 网 站 上 单 击 鼠标 右键 ， 从 弹出 的 快捷 菜单 中 选择 “新 建 ”一 “虚拟 目录 ”命令 ， 
将 弹出 “虚拟 目录 创建 向 导 ” 对 话 框 ， 单 击 “ 下 一 步 ”按钮 ， 出 现 “虚拟 目录 别名 ”界面 ， 
如 图 1-8 所 示 。 在 输入 别名 后 单 击 “ 下 一 步 ” 按 钮 ， 将 出 现 路 径 选 择 对 话 框 ， 依 次 按照 提 
示 操 作 即 可 完成 虚拟 目录 的 创建 设置 。 

要 修改 虚拟 目录 的 属性 ， 可 在 IS 控制 台中 选中 虚拟 目录 后 单 击 鼠 标 右键 ， 在 弹出 的 快 
捷 菜 单 中 选择 “属性 ”命令 ， 将 弹出 如 图 1-9 所 示 的 对 话 框 ， 根 据 需 要 进行 设 定 。 


| [ee EE 
全 碟 执 日 录 | 立 禄 ”| 月 录 安 全 性 | MTTP 水 | 自 证 义 异 误 | ASP ET 
虚拟 目录 别名 9 一 一 一 一 | - 
少 须 为 具 执 目 录 提 供 一 个 简短 的 名 称 区 别 各 ,以 便于 快速 引用 4 A pr 
个 另 一 自 计算 机 上 的 共 训 
基 人 是 可 人 2 罗 和 录 访 问 权限 的 别 各， 使 用 的 俞 名 规 下 志向 到 URLQD 
不 地 8 径 C)。 厄 Vj HE 
别名 由 ) 厂 脚本 寄 源 边 问 CD) 三 记录 边 问 
| [9 厂 索引 秩 源 号 
厂 写 入 双 ) 
厂 日 对调 蜂 @) 
应 用 程序 论 填 
应 用 程序 名 吧 ) FF EC 
开始 位 置 MU 
也 行 积 限 @) Baa | 
应 用 程序 保护 0 [ct 用 可 一 3 中 


《上 - 步 四 [下 -*m 说 | 友 定 | 取消 | 应 有 | 天助 | 


图 1-8 “虚拟 目录 别名 ”界面 图 1-9 虚拟 日 录 属性 
1.4 ASP 程序 初步 介绍 


1.4.1 简单 示例 


【 例 1-1】 简单 ASP 程序 


ex1-1.asp = 


<html> 
<body> 
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<center><b><font color="green" size="6"> 第 一 个 asp 程序 </font></b> 
</center><BR> 

<%Fori=3 To7 %> 

<FONT SIZE=<% = i %>> 本 行 字体 大 小 是 <%=i%> 号 字 ! </ FONT><BR> 
<%Next %> 

</body> 

</html> 


运行 结果 如 图 1-10 所 示 。 


http://1ocelhost/s/erl ierese 本 二 对 


| 文件 四 “编辑 四 查看 中 ) 色 ， 工具 I) 帮助 0 Ly 

EW [Eh /ocuhos Ux/ ei-! usp EE 
| 
第 一 个 asp 程 序 

本 行 字体 大 小 是 3 号 字 ! 

本 行 字体 大 小 是 4 号 字 ! 


本 行 字体 大 4 人 
本 行 字 体 大 小 是 6 号 字 ! 


本 行 字体 大 小 是 7 号 字 ! 


Eg 


[Tiri [i Cunss 


图 1-10 exl-1l.asp 程序 访问 结果 


【说 明 】 可 以 看 出 ，ASP 文件 中 脚本 代码 和 HTML 文本 混合 在 一 起 ， 随 着 脚本 代码 中 
循环 的 执行 ， 循 环 内 所 包含 的 HIML 文本 将 重复 出 现 。 脚 本 代码 中 的 <% = i %> 表 示 在 页 
面 中 输出 i 的 值 ， 脚 本 在 页 面 中 哪个 位 置 ， 则 输出 也 将 嵌入 在 页 面 的 该 位 置 。 


1.4.2 ASP 脚本 语言 设 定 


ASP 的 默认 脚本 语言 是 VBScript， 它 也 是 编写 ASP 最 合适 的 脚本 语言 。 除 了 VBScript 
之 外 ， 如 果 需 要 使 用 其 他 脚本 语言 编写 ASP 网 页 ， 则 应 在 文件 的 开头 位 置 使 用 <%@ 
language=…%> 加 以 设 定 ， 注 意 @ 和 language 之 间 一 定 要 有 空格 。 

以 下 ASP 文件 所 用 的 脚本 语言 是 JavaScript。 


<%@ language="javascript" %> 
<html> 

<body> 

<% 

var d = new Date() 
Response.Write(d) 

%> 

</body> 

</html> 


【说 明 】 此 时 脚本 中 用 Response.Write 方法 在 页 面 上 输出 信息 ， 与 前 面 例子 中 <%=…%> 
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方式 的 作用 相同 。 
【注意 】VBScript 是 不 区 分 大 小 写 的 ， 但 JavaScript 是 区 分 大 小 写 的 。 例 如 ， 在 VBScript 

中 用 小 写 response.write， 脚 本 也 将 正常 执行 ， 但 在 JavaScript 中 则 一 定 要 写成 Response. 
Write， 否 则 会 出 错 。 

另外 ， 还 可 以 使 用 SCRIPT 标记 的 LANGUAGE 属性 来 设置 所 用 的 脚本 语言 ， 并 用 
RUNAT 属性 指明 脚本 是 在 服务 器 端 运行 的 。 常 用 该 形式 定义 服务 器 端 要 执行 的 函数 。 例 如 : 

<SCRIPT LANGUAGE = "VBScript" RUNAT = "Server > 

function pickst(table,amount,knowledges,diff) 


end function 
</SCRIPT> 
【注意 】 在 SCRIPT 标记 中 如 果 未 指定 RUNAT = "Server" 属 性 ， 则 表明 其 中 的 脚本 代 
码 是 在 客户 端 使 用 的 。 


1.4.3 ”服务 器 端 包含 的 文件 


如 果 一 段 代码 要 在 多 个 ASP 文件 中 重复 使 用 , 可 以 将 该 代码 段 安 排 在 一 个 专门 的 文件 
中 ， 用 到 该 段 代码 的 ASP 文件 可 通过 #include 命令 将 其 内 容 插入 到 文档 中 。 其 语法 格式 
如 下 : 
<!-- #include filelvirtual = Filename --> 
其 中 ，file 和 virtual 参数 指定 包含 文件 的 路 径 类 型 。 
口 ”file 指定 路 径 类 型 为 使 用 #include 命令 的 文件 所 在 文件 夹 的 相对 路 径 , 被 包含 文件 
可 以 位 于 相同 文件 夹 或 子 文件 夹 中 ， 但 它 不 能 处 于 父 文 件 夹 中 。 
口 。virtual 指定 路 径 类 型 为 Web 站 点 上 虚拟 目录 的 完整 虚拟 路 径 。 
口 ”Filename 参数 指定 要 包含 的 文件 名 ， 必 须 包含 文件 扩展 名 ， 而 且 必 须 用 引号 将 文 
件 名 括 起 来 。 被 包含 文件 的 扩展 名 可 以 任意 命名 ， 但 建议 使 用 .inc 扩展 名 。 例 如 : 
<!-- #include file = "adcvbs.inc"--> 


<I-- #include virtual = "/scripts/tools/global.inc”" --> 
<I-- #include file = "md5.asp" --> 


【注意 】 
(1) 不 能 使 用 ASP 程序 代码 动态 设 定 “被 包括 ”的 #include 文件 。 例 如 : 


<% name= test & "inc"%> 
<!--#include file="<%=name%>"--> 


(2) 使 用 #include 可 以 提高 代码 的 重用 性 ， 达 到 “一 处 定义 ， 多 处 使 用 ”的 目的 。 在 
实际 应 用 中 一 般 将 常量 定义 、 函 数 定义 等 安排 在 inc 文件 中 ， 但 从 另 一 方面 来 说 ，#include 
的 使 用 也 带 来 了 效率 上 的 下 降 ， 建 议 读者 合理 选择 。 
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本 章 小 结 


本 章 介 绍 了 ASP 的 基础 知识 ， 包 括 Web 访问 的 基本 原理 、IIS 服务 器 的 安装 与 配置 、 
ASP 的 工作 原理 与 特点 以 及 ASP 程序 基本 组 成 结构 等 。 目 的 是 让 读者 对 ASP 的 运行 环境 
和 代码 结构 有 一 个 基本 的 了 解 。 


习题 
1. 选择 题 
(1) 可 以 使 用 ( ) 软件 编辑 ASP 程序 。 
A. 记事 本 B. FrontPage 
C. Excel D. Dreamweaver 


(2) 以 下 说 法 正确 的 是 ys 
A. 只 有 微软 公司 推出 的 Web 服务 器 才 支 持 ASP 
B.， 从 浏览 器 的 菜单 栏 选择 “查看 ”一 “ 源 文件 ”命令 ， 即 可 看 到 ASP 程序 代码 
C. 在 ASP 程序 中 能 使 用 VBScript 语言 ， 但 不 能 使 用 JavaScript 语言 
D. 浏览 者 只 要 从 正 中 选择 查看 源 文件 ， 即 可 看 到 ASP 代码 

(3) 假设 计算 机 的 域名 为 xxx.ecjtujx.cn，Web 主 目录 为 CInetpubvwwwroot， 同 时 

在 此 目录 下 还 有 一 个 ASP 程序 ， 其 完整 路 径 为 C:\Inetpub\Wwwwroot\test\ShowTime.asp。 如 
果 要 在 浏览 器 中 执行 此 ASP 程序 ， 则 必须 在 地 址 栏 中 输入 的 网 址 是 (  ) 。 

A. http://xxx.ecjtu.jx.cn/ShowTime.asp 
B. file://xxx.ecjtu.jx.cn/ShowTime.asp 
C. http://Inetpub/wwwroot/xxx/ShowTime.asp 
D. http://xXxx.ecjtu.jx.cn/test/ShowTime.asp 

(4) Web 服务 器 的 概念 主要 是 指 (  )。 
A. 提供 Web 服务 的 计算 机 
B. 辅助 信息 处 理 的 计算 机 
C. 提供 Web 服务 的 程序 
D. 提供 Web 服务 的 公司 

2. 问答 题 
(1) 简 述 ASP 的 工作 原理 与 特点 。 
(2) ASP 的 运行 平台 是 什么 ? 如 何 建立 Web 站 点 和 虚拟 目录 ? 
3. 操作 题 
(1) 在 DD 盘 建 立 一 个 文件 夹 test， 用 于 存放 编写 的 ASP 程序 ， 同 时 设置 “默认 网 站 ” 
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的 主 目录 为 所 建 的 文件 夹 。 
(2) 用 记事 本 编写 一 个 ASP 程序 ， 命 名 为 x.asp， 存 储 到 文件 夹 test 下 。 用 浏览 器 访 
问 建立 的 文件 (如 http://localhost/x.asp)。 


-一 -一 -一 -一 -一 一 一 - X.asp -一 - -一 -- 一 一 -一 -一 一 -一 
<html> 

<body> 

<font color="red" size="7"> 奥 运 纪念 </font><BR> 

<%For i=2 To 20 step 3%> 

<span style="color=blue;font-size=<%=i%>pt;">2008 北京 ! </ span><BR> 

<%Next %> 

</body> 

</html> 


(3) 将 上 述 两 个 文件 复制 到 另 一 个 路 径 下 ， 建 立 一 个 虚拟 目录 you 指向 文件 所 在 的 新 
路 径 。 用 浏览 器 访问 文件 (如 http://localhost/yow/x.asp) 。 

(4) 设置 默认 网 站 的 “默认 文档 ”为 x.asp， 用 浏览 器 访问 网 址 http://localhost/。 对 x.asp 
程序 中 的 字体 颜色 、 大 小 及 文字 等 内 容 进 行 修改 ， 观 察 网 页 内 容 的 显示 变化 。 另 外 ， 通 过 
全 地 址 访问 其 他 同学 的 网 站 。 


第 2 章 HTML 语言 介绍 


2.1 HTML 概述 


Web 信息 发 布 是 通过 网 页 实现 的 ， 要 编辑 网 页 的 内 容 首 先 要 熟悉 网 页 的 基本 语言 
HTML。HTML 通过 标记 来 指示 要 显示 网 页 中 的 各 个 部 分 ， 即 确定 网 页 内 容 的 格式 。 浏 览 
器 按照 顺序 阅读 HTML 文件 ， 然 后 根据 内 容 附近 的 HTML 标记 来 解释 和 显示 各 种 内 容 。 
需要 注意 的 是 ， 所 有 的 标记 都 必须 用 尖 括 号 〈 即 小 于 号 “<” 和 大 于 号 “>”) 括 起 来 。 


2.1.1 HTML 文档 结构 


HTML 文档 的 基本 结构 表示 如 下 : 
<HTML> 
<HEAD> 
<TITLE> 标 题 文字 </TITLE> 
<HEAD> 
<BODY> 
<!-- 可 插入 文本 、 图 像 、 动 画 、HTML 指令 等 -> 
</BODY> 
</HTML> 
【说 明 】 
(1) 3 对 顶级 标记 <HTML>、<HEAD>、<BODY>。 
口 “<HTML></HTML> 标 记 可 理解 为 整个 HIML 文档 的 开始 与 结束 。 
口 “<HEAD></HEAD> 标 记 头 部 ， 用 于 提供 与 Web 页 有 关 的 各 种 信息 ， 在 <HEAD> 标 
记 中 ， 使 用 <TITLE> 标 记 来 指定 网 页 的 标题 。 
口 <BODY></BODY> 标 记 所 括 住 的 部 分 是 整个 文档 的 正文 。 
(2) 注释 由 开始 标记 <!-- 和 结束 标记 --> 构 成 ， 注 释 内 容 不 在 浏览 器 窗口 中 显示 。 
(3) HTML 标记 不 区 分 大 小 写 。 
【 例 2-1】 HTML 示例 
NE demo.htm- 
<html> 
<head> 


<title> 网 上 教学 </title> 
</head> 
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<body> 

<h3> 华 东 交 大 网 上 教学 </h3> 

<h2 align= "center" >http://cai.ecjtu.jx.cn/</h2><br> 
<h1> 欢 迎 访问 已 有 课程 ! </h1> 

<h1> 教 师 可 申请 新 课程 </h1> 

</body> 

</html> 


用 浏览 器 显示 上 述 代码 文件 ， 可 得 到 如 图 2-1 所 示 的 结果 。 


潮 同 上 教学 - Wicre 


| 文件 中、 编 铝 加 ”查看 收 京 ) 工具 天” | 证 接 | 各 
[ET] Sr 可 日 
习 


华东 交大 网 上 教学 
http://cai. ecjtu. jx.cn/ 

欢迎 访问 己 有 课程 ! 

教师 可 申请 新 课程 


图 2-1 HTML 示例 


【说 明 】 

(1) 网 页 的 标题 (title) 在 浏览 器 的 标题 栏 显示 。 

(2) 关于 标记 符 的 进一步 解释 。 

口 HTML 文档 中 大 部 分 标记 是 成 对 出 现 的 ， 称 为 成 对 标记 ， 每 个 标记 包括 开始 标记 
和 结束 标记 ， 它 们 所 括 住 的 部 分 也 就 是 标记 所 影响 的 范围 ;结束 标记 与 开始 标记 
名 称 相同 ， 但 结束 标记 总 是 以 一 个 斜 线 符号 开头 (如 <HTML> 和 </HTML>) 。 田 
外 ， 也 有 部 分 标记 只 需 一 个 符号 ， 称 为 非 成 对 标记 ， 如 <BR> 标 记 ， 其 作用 是 实现 
换行 。 

口 大 多 数 标记 都 拥有 一 个 属性 集 , 通过 这 些 属性 可 以 对 作用 的 内 容 进 行 更 多 的 控制 。 
所 有 属性 都 放置 在 开始 标记 的 尖 括 号 内 。 本 例 中 <h2 align= "center" > 表示 要 使 用 2 
号 标题 且 用 居中 方式 显示 文字 。 


2.1.2 ”常用 HTML 编辑 工具 


HTML 文件 的 内 容 均 为 文本 ， 可 以 用 任意 文本 编辑 器 进行 编辑 ， 如 用 Windows 自 带 的 


记事 本 、 写 字 板 等 , 同时 也 可 以 用 专门 的 网 页 制作 工具 进行 编辑 , 如 Dreamweaver、 FrontPage 
等 。 使 用 网 页 制作 工具 的 优点 是 速度 快 ， 可 以 进行 图 形 化 编辑 ， 实 现 所 见 即 所 得 的 功能 ， 


在 


E 编 辑 过 程 中 自动 产生 HIML 代码 。 图 2-2 所 示 为 FrontPage 的 操作 界面 ， 在 该 界面 中 单 


击 底部 的 “代码 ”标签 可 切换 到 代码 视图 ， 查 看 对 应 的 HTML 代码 。 


使 用 网 页 制作 工具 的 缺点 是 产生 的 代码 格式 比较 混乱 ， 可 读 性 差 ， 后 期 代码 维护 较 困 


难 。 另 外 ， 代 码 中 往往 带 有 一 些 多 余 的 成 分 ， 这 些 多 余 的 代码 增 大 了 HTML 文件 的 容量 ， 
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同时 也 影响 了 浏览 器 解析 执行 的 效率 。 所 以 说 ， 好 的 设计 应 该 是 文本 编辑 器 和 网 页 制作 工 
具 两 者 的 结合 ， 因 此 ， 对 于 Web 开发 者 来 说 ， 熟 悉 HTML 语言 中 符号 的 表示 意义 是 一 个 
必 不 可 少 的 基本 功 。 
=l9lx| 
文件 四 ”编辑 四” 视图) 插入 中 格式 四 工具 0 表格 各 数据 框架 轩 窗口 思 帮助 op 
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欢迎 访问 已 有 课程 ! 
教师 可 申请 新 课程 


国语 让 日 拆 分 日 代码 预 | | » 
浇 要 获取 帮助 ， 请 近 Fl 5Kbps Pes x 57 其 认 | 中 十 又 


图 2-2 ”FrontPage 的 操作 界面 
2.2 HTML 文本 设计 


2.2.1 设置 body 属性 


soa 


<BODY> 标 记 作 为 网 页 的 主体 部 分 ， 有 很 多 内 置 属性 ， 这 些 属 性 用 于 设置 网 页 的 总 体 
风格 ， 如 表 2-1 所 示 。 
表 2-1 <BODY> 标 记 的 主要 属性 


属 性 功能 
background 指定 文档 背景 图 像 的 URL 地址 
bgcolor 指定 文档 的 背景 颜色 

text 指定 文档 中 文本 的 颜色 

link 指定 文档 中 未 访问 过 的 超 链接 的 颜色 ， 默 认为 蓝 色 
vlink 指定 文档 中 已 被 访问 过 的 超 链接 的 颜色 ， 默 认为 紫色 
alink 指定 文档 中 正 被 选中 的 超 链接 的 颜色 ， 默 认为 红色 


leftmargin 设置 网 页 左边 留 出 空白 间距 的 像素 个 数 


topmargin 设置 网 页 上 方 留 出 空白 间距 的 像素 个 数 
在 上 述 属 性 中 ， 各 个 颜色 属性 的 值 有 两 种 表示 方法 : 一 种 是 使 用 颜色 名 称 来 指定 ， 如 
红色 、 绿 色 和 蓝 色 分 别 用 red、green 和 blue 表示 ; 一 种 是 使 用 十 六 进 制 RGB 格式 表示 ， 表 
示 形 式 为 color="#RRGGBB'" 或 color="RRGGBB", 其 中 RR 是 红色 、GG 是 绿色 、BB 是 蓝 色 
各 颜色 分 量 的 取 值 范围 为 00~EFF。 例 如 ，#00ff00 表示 绿色 ， 红 FFFFF 表示 白色 。 
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2.2.2 ”段落 格式 化 


1. 分 段 与 换行 


在 HTML 文档 中 ， 不 能 像 在 Word 中 那样 使 用 回 车 、 空 格 、Tab 键 来 进行 文档 的 段落 
调整 ， 而 是 要 使 用 标记 实现 分 段 与 换行 的 效果 。 

(1) 分 段 标记 了 

分 段 标记 用 于 定义 段落 ， 段 落 的 结束 由 </P> 来 标记 ，</P> 是 可 以 省 略 的 ， 因 为 下 一 
<P> 的 开始 就 意味 着 上 一 个 <P> 的 结束 。 在 默认 情况 下 ， 两 个 段落 间 有 一 空 行 作为 段 间距 。 

(2) 换行 标记 BR 

换行 标记 强行 规定 了 当前 行 的 中 断 ， 使 后 续 内 容 在 下 一 行 显示 。 

(3) 标题 标记 Hn 

标题 标记 用 于 设置 文档 中 的 标题 和 副标题 , 其 中 的 取 值 是 1 一 6; <H1> 标 记 表 示 字 体 
最 大 的 标题 ，<H6> 标 记 表 示 字 体 最 小 的 标题 。<H1> 一 <H6> 标 题 标 记 会 自动 将 字体 加 粗 ， 
并 在 文字 上 下 空 一 行 。 

(4) 水 平 线 标记 HR 

水 平 线 标记 用 于 在 文档 中 添加 一 条 水 平 线 ， 用 来 分 开 文档 的 两 个 部 分 ， 该 标记 的 属性 
如 下 。 

GO ALIGN: 指定 线 的 对 齐 方 式 。 

@ COLOR: 指定 线 的 颜色 。 

@ NOSHADE: 若 指 定 该 项 ， 则 显示 一 条 无 阴影 的 实 线 。 

由 SIZE: 指定 线 的 宽度 ， 以 像素 为 单位 。 

@ WIDTH: 指定 线 的 长 度 ， 单 位 可 以 是 像素 或 百分比 〈 占 页 面 宽度 的 百分比 ) 。 

(5) 预 格式 化 标记 pre 

在 编辑 文本 中 包括 空格 、 换 行 、 制 表 等 排版 符号 ， ee eran 
些 预 格式 化 符号 ， 采 用 预 格式 化 标记 <pre> 可 以 保留 这 些 符 号 的 效果 ， 从 而 使 浏览 器 中 显 
的 文字 排列 保持 原来 的 格式 。 以 后 在 处 理 用 户 从 文本 框 提 交 的 数据 显示 时 ， in 吕 和 二 保持 
用 户 的 编辑 风格 ， 可 以 使 用 该 标记 。 


2. 设置 对 齐 方式 


在 HTML 的 众多 标记 中 ，ALIGN 属性 可 以 用 来 设置 对 齐 方式 ， 如 分 段 标记 <P>、 标 题 
标记 <Hn> 及 水 平 线 标记 <HR> 等 。ALIGN 属性 的 取 值 可 以 是 left 〈 左 对 齐 ) 、center〈 居 中 
对 齐 ) 、right ( 右 对 齐 ) 及 justify (两 边 对 齐 ) 。 两 边 对 齐 是 指 将 一 行 中 的 文本 在 排 满 的 
情况 下 向 左右 两 页 边 对 齐 ， 以 避免 在 左右 页 边 出 现 锯 具 状 。 

对 于 不 同 的 标记 ，ALIGN 属性 的 默认 值 是 有 所 不 同 的 。 对 于 分 段 标记 和 <Hn> 标 记 ， 
ALIGN 属性 的 默认 值 为 left， 对 于 水 平 线 标记 <HR>，ALIGN 属性 的 默认 值 为 center。 

【注意 】 内 容 的 对 齐 方 式 由 直接 包含 它 的 标记 决定 ， 以 下 代码 段 的 效果 是 左 对 齐 ， 因 
为 直接 包含 文字 的 标记 是 h2， 而 h2 默认 的 对 齐 方 式 是 左 对 齐 。 
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<p align=center><h2 >Web 程序 设计 基础 教程 </h2></p> 


2.2.3 字符 格式 化 


1. 设置 字 体 、 字 号 和 颜色 


用 FONT 标记 的 FACE、SIZE 和 COLOR 属性 来 设置 文本 的 字体 、 字 号 和 颜色 。 字 号 
的 取 值 可 以 是 1 一 7， 默 认 值 为 3，SIZE 值 越 大 ， 显 示 的 字 就 越 大 。 另 外 ， 还 可 使 用 “+?” 
或 “-” 号 来 指定 相对 字号 ， 即 相对 默认 字体 大 小 的 增 量 。 
【 例 2-2】 设置 字体 、 字 号 与 颜色 


a RE 
<html> 

<body> 

<p><font size="4" face=" 宋 体 ">Web 编程 基础 教程 </p> 

<p align=left> 

<font size="+2" face=" 黑 体 " color="red">Web 编程 基础 教程 </font> 

</p> 


<p align=center> 
<font size="3" face=" 宋 体 " color="#00CC66">Web 编程 基础 教程 </font> 


</p> 

<p><font size="6" color="#31899B">Web 编程 基础 教程 </font></p> 

<p align=right> 

<font size="7" face=" 华 文 行 楷 " color="#CC6600">Web 编程 基础 教程 </font> 

</p> 

<p align=center><h2 >Web 程序 设计 基础 教程 </h2></p> 

</body> 

</html> 

运行 结果 如 图 2-3 所 示 。 
[B22 hs Nicrosoft Interset e016 =l9lx] 
| 文件 四 编辑 区 ) 查看 WD) 收 训 4) 工具 0) 帮助 0D | 意 
[ED [Eo \ex2-2 hs EE 
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Web 编 程 基础 教 丰 


Web 编 程 基础 教程 
Web 程 序 设计 基础 教程 


图 2-3 字体 、 字 号 与 颜色 


【思考 】 使 
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] size="+3" 的 字体 相当 于 儿 号 字体 ? 
2. 设置 字体 样式 
字体 样式 用 于 为 字符 设置 特殊 格式 ， 常 用 的 字体 样式 标记 如 表 2-2 所 示 。 
表 2-2 常用 的 字体 样式 标记 
标记 字体 样式 标 记 字体 样式 
<B>…</B> 粗 体 <BIG>…</BIG> 字体 
<U>…</U> 下 划 线 <SMALL>…</SMALL> 小 字体 
<I>…</> <STRIKE>…</STRIKE> 删除 线 
<SUP>…</SUP> <SUB>…</SUB> 下 标 
3， 特殊 字符 
诸如 “<” 这 样 的 字符 在 HTML 语言 中 具有 特殊 的 表示 意义 ， 因 此 ， 要 在 网 页 中 显示 
这 样 的 字符 实际 是 用 特殊 表示 符 实现 。 常 用 的 特殊 符号 标记 如 表 2-3 所 示 。 
表 2-3 常用 的 特殊 符号 标记 
字符 对 应 字符 标记 说 了 明 
< &lt 小 于 符号 
S &g 大 于 符号 
& Kam AND 符号 
对 &quot 双 引 号 
&nbsp: 空格 
。 &middot 中 点 
Rsect 分 节 符号 
© &cop 版 权 符 号 
® Rre: 注册 符号 
【 例 2-3】 字体 样式 设置 
ex2-3.htm. 
<html> 
<head> 
<title> 字 体 样式 </title> 
</head> 
<body> 
<p align="center"><b><big> 
</p> 


<sub> 下 标 </sub> 等 。</font> 
</p> 


<font size="5" color="#0000FF" face=" 楷 体 _GB2312"> 作 业 编 辑 器 功能 说 明 </font></big></b> 
<p><font color="#008080"> 编 辑 器 允许 用 户 设置 <b> 粗 体 </b>、<u> 下 划 线 </u>、 


<i> 斜 体 </i> 、<strike> 删 除 线 </strike>， 以 及 设置 文字 的 <sup> 上 标 </sup> 和 


<h2><font color="#FF0000">&lt;br&gt;</font> 的 作用 是 换行 ， 
<font color="#FF0000">&lt;p&gt;</font> 的 作用 是 换 段落 </h2> 
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</body> 
</html> 


在 FrontPage 预览 视图 中 的 效果 如 图 2-4 所 示 。 


DD - 世 - 曙 执 训 | 胡 -| 生 已- 笋 | 名 
| 可 


e223. ht 


作业 编辑 器 功能 说 明 


编辑 器 多 许 用 户 设置 粗 体 ， 了 划 线 ， 何 给 日 陈 线 . 以 及 设置 文字 的 上 标 和 下 村 等 


《br> 的 作用 是 换行 , <p> 的 作用 是 换 段 落 


习 
[Box i 两 | 自 完 义 


吕 设 计 日 六 分 口 代码 区 殉 ] 


图 2-4 字体 样式 


【注意 】 当 使 用 FrontPage 的 编辑 工具 时 ， 在 编辑 视图 中 输入 HTML 标记 内 容 ， 在 代 
码 视图 中 可 看 到 对 应 的 特殊 符号 ， 在 预览 视图 中 可 看 到 设计 效果 。 


2.2.4 使 用 列表 格式 


在 网 页 中 经 常 使 用 的 列表 分 为 有 序列 表 和 无 序列 表 两 种 。 由 带 有 序号 标志 〈 如 数字 、 
字母 等 ) 的 表 项 组 成 的 为 有 序列 表 ， 否 则 为 无 序列 表 。 
1. 创建 有 序列 表 
有 序列 表 是 在 各 列表 项 前 面 显示 数字 或 字母 的 缩 排列 表 ， 可 以 使 用 有 序列 表 标 记 OL 
和 列表 项 标记 LI 来 创建 ， 语 法 格式 如 下 : 
<OL> 
<LI 列 表 项 1</LI> 
<LE 列 表 项 2</LI> 
<LE 列 表 项 n</LI> 
</OL> 
OL 标记 有 两 个 常用 属性 ， 即 START 和 TYPE。START 属性 用 于 数字 序列 的 起 始 值 ， 
可 以 取 整 数值 ，TYPE 属性 用 于 设置 数字 序列 样式 ， 其 取 值 如 下 。 
口 1: 表示 阿拉 伯 数 字 1、2、3 等 ， 此 为 默认 值 。 
口 A: 表示 大 写字 母 A、B、C 等 。 
口 a: 表示 小 写字 母 a、b、c 等 。 
口 I: 表示 大 写 罗 马 数字 I、I、II、IV 等 。 
口 
【 注 


i: 表示 小 写 罗 马 数 字 i、ii、 过 、iv 等 。 
注意 】TYPE 属性 的 值 是 区 分 大 小 写 的 。 
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当 位 于 <OL> 和 </OL> 标 记 之 间 时 , LI 标记 有 两 个 常用 属性 , 即 TYPE 和 VALUE。TYPE 
属性 指定 数字 样式 , 其 取 值 与 OL 的 TYPE 属性 相同 ; VALUE 属性 指定 一 个 新 的 数字 序列 
起 始 值 ， 以 获得 非 连续 性 的 数字 序列 。 


2. 创建 无 序列 表 
无 序列 表 是 一 种 在 各 列表 项 前 面 显示 特殊 项 目 符号 
记 UL 和 列表 项 标记 LI 来 创建 ， 语 法 格式 如 下 : 
<UL> 
<LI> 列 表 项 1</LI> 
<L 列 表 项 2</LI> 


的 缩 排列 表 ， 可 以 使 用 无 序列 表 标 


<L 列 表 项 n</LI> 
</UL> 
UL 标记 的 TYPE 属性 用 于 指定 列表 项 前 面 显示 的 项 目 符号 ， 其 取 值 如 下 。 
口 disc: 使 用 实心 圆 作为 项 目 符号 〈 默 认 值 ) 。 
口 circle: 使 用 空心 圆 作为 项 目 符号 。 
口 ”square: 使 用 方块 作为 项 目 符号 。 
【 例 2-4】 列表 项 的 使 用 


- -ex2-4.htm 
<p align="left"> 以 下 演示 无 序列 表 的 使 用 </p> 

<ul type="square"> 
<litype="disc"> 第 一 章 Web 编程 基础 知识 </li> 
<li> 第 二 章 VBScript 脚本 语言 </li> 

<li type="circle"> 第 三 章 ASP 程序 设计 </li> 


</ul> 
<p> 以 下 演示 有 序列 表 </p> 
<ol> 


<livalue="3"> 第 一 章 Web 编程 基础 知识 </li> 
<li> 第 二 章 VBScript 脚本 语言 </li> 
<litype="A"> 第 三 章 ASP 程序 设计 </li> 


运行 结果 如 图 2-5 所 示 。 


以 下 搞 示 无 序列 表 的 使 用 
。 第 一 章 Hcl 全程 基础 知 认 
Ws 3 


三 相 和 


[Ea RE] 


图 2-5 列表 的 演示 
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2.3 使 用 表格 


表格 在 网 页 设计 中 应 用 广泛 ， 它 不 仅 可 作为 信息 的 一 种 表示 形式 ， 还 常用 于 页 面 设计 
中 的 布局 与 定位 。 


2.3.1 创建 基本 表格 


表格 一 般 由 若干 行 和 若干 列 的 单元 格 组 成 ， 表 格 上 面 可 以 有 一 个 标题 ， 表 的 第 一 行 称 
为 表 头 。 与 表格 相关 的 标记 如 下 。 
口 <TABLE>: 界定 表格 ， 最 常用 的 属性 是 BORDER， 定 义 边界 线 的 粗细 。 
口 <CAPTION>: 定义 表格 的 标题 。 
口 <TR>: 定义 表格 的 一 行 。 
口 <TH>: 定义 表 头 的 各 栏 内 容 ， 其 中 字体 默认 为 粗 体 。 
口 <TD>: 定义 单元 格 。 

在 FrontPage 中 , 创建 表格 有 两 种 常用 的 方法 , 一 种 是 通过 “表格 ”菜单 的 “插入 表格 ” 
子 菜单 ， 进 入 “插入 表格 ”对 话 框 ， 对 其 中 的 行 数 、 列 数 、 高 度 、 宽 度 等 参数 进行 设置 ; 
另 一 种 是 通过 “插入 表格 ”图 标 ， 拖 动 鼠 标 选择 行 、 列 数 即 可 。 


2.3.2 ”表格 设置 


1. 设置 表格 的 属性 

创建 表格 时 ， 可 以 通过 TABLE 标记 的 下 列 属性 来 对 表格 的 格式 进行 设置 。 

(1) ALIGN: 指定 表格 的 对 齐 方式 ， 取 值 可 以 是 left (默认 值 )、center 或 right。 

(2) BACKGROUND: 指定 用 作 表 格 背 景 图 片 的 URL 地 址 。 

(3) BGCOLOR: 指定 表格 的 背景 颜色 。 

(4) BORDER: 指定 表格 边框 的 宽度 ， 以 像素 为 单位 ， 默 认 值 为 0。 

(5) BORDERCOLOR: 指定 表格 边框 的 颜色 ， 应 与 BORDER 属性 一 起 使 用 。 

(6) BORDERCOLORDARK: 指定 3D 边框 的 阴影 颜色 , 应 与 BORDER 属性 一 起 使 用 。 

(7) BORDERCOLORLIGHT: 指定 3D 边框 的 高 亮 显 示 颜 色 ， 应 与 BORDER 属性 一 
起 使 用 。 

(8) CELLPADDING: 指定 单元 格 内 数据 与 单元 格 边框 之 间 的 间距 ， 以 像素 为 单位 。 

(9) CELLSPACING: 指定 单元 格 之 间 的 间距 ， 以 像素 为 单位 。 

(10) WIDTH: 指定 表格 的 宽度 ， 以 像素 或 百分比 为 单位 。 

2. 设置 行 的 属性 

表格 每 一 行 用 TR 标记 定义 ， 可 以 通过 该 标记 的 下 列 属性 对 指定 行 的 格式 进行 设置 。 
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(1) ALIGN: 指定 该 行 中 单元 格 的 水 平 对 齐 方 式 ， 取 值 为 left (默认 值 ) 、center 或 
right。 

(2) BACKGROUND: 给 出 该 行 的 背景 图 像 文件 的 URL。 

(3) BGCOLOR: 指定 该 行 的 背景 颜色 。 

(4) BORDERCOLOR: 指定 该 行 的 边框 颜色 ， 该 属性 只 有 当 TABLE 标记 的 BORDER 
属性 取 非 零 值 时 才 起 作用 。 

(5) BORDERCOLORDARK: 指定 该 行 的 3D 边框 的 阴影 颜色 ， 该 属性 只 有 当 TABLE 
标记 的 BORDER 属性 取 非 零 值 时 才 起 作用 。 


标记 的 BORDER 属性 取 非 零 值 时 才 起 作用 。 

(7) VALIGN: 指定 该 行 中 单元 格 内 容 的 垂直 对 齐 方式 ， 该 属性 的 取 值 可 以 是 top( 顶 
端 对 齐 ) 、middle (居中 对 齐 ) 、bottom ( 底 端 对 齐 ) 或 baseline (基线 对 齐 ) 。 

3. 设置 单元 格 的 属性 

通过 TD 和 TH 标记 的 下 列 属 性 可 以 对 指定 单元 格 的 格式 进行 设置 。 

(1) ALIGN: 指定 单元 格 内 文本 的 水 平 对 齐 方式 ， 取 值 为 left (默认 值 ) 、center 或 
right。 

(2) BACKGROUND: 指定 单元 格 背 景 图 像 的 URL。 

(3) BGCOLOR: 指定 单元 格 的 背景 颜色 。 

(4) BORDERCOLOR: 指定 单元 格 的 边框 颜色 。 

(5) BORDERCOLORDARK: 用 于 指定 单元 格 的 3D 边框 的 阴影 颜色 。 

(6) BORDERCOLORLIGHT: 用 于 指定 单元 格 的 3D 边框 的 高 亮 颜色 。 

(7) COLSPAN: 指定 合并 单元 格 时 一 个 单元 格 跨越 的 表格 列 数 。 

(8) NOWRAP: 该 属性 可 避免 Web 浏览 器 将 单元 格 中 的 文本 换行 。 

(9) ROWSPAN: 指定 合并 单元 格 时 一 个 单元 格 跨越 的 表格 行 数 。 

(10) VALIGN: 指定 单元 格 中 文本 的 垂直 对 齐 方式 ， 取 值 可 以 是 ttp、middle〈 默 认 
值 ) 、bottom 或 baseline。 

在 FrontPage 中 ， 要 进行 表格 和 单元 格 的 操作 ， 首 先 要 通过 鼠标 选取 操作 对 象 ， 然 后 通 
过 “表格 ”菜单 提供 的 功能 进行 操作 ; 或 者 选中 对 象 后 单 击 鼠 标 右 键 ， 从 弹出 的 快捷 菜单 
中 选择 相应 的 功能 命令 完成 操作 。 
【 例 2-5】 表格 设计 

本 二 i RR 

<html> 

<body> 

<table border="1" width="100%" cellspacing="1" > 

<caption> ”<!-- 定 义 表 的 标题 --> 

<b> 


<font size="4" face=" 楷 体 _GB2312" color="#008000"> 课 程 建设 评分 表 </font> 
</b><br> 


_ 


We 


We 
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</caption> 

<tr> ”<!-- 表 的 第 1 行 -> 

<td width="213" height="28" rowspan="2" align="center"> 一 级 指标 </td> 
<td width="446" height="28" colspan="2" align="center"> 二 级 指标 </td> 
<td width="100" height="31" rowspan="2" align="center"> 评 分 </td> 
</tr> 

<tr> <!- 表 的 第 2 行 -> 

<td width="296" height="28" align="center"> 名 称 </td> 

<td width="144" height="28" align="center"> 权 重 </td> 

</tr> 

<tr> <!-- 表 的 第 3 行 --> 

<td width="213" rowspan="2" align="center" height="28"> 课 程 规 划 </td> 
<td width="296" align="center" height="28"> 课 程 建 设 规划 </td> 

<td width="144" align="center" height="28">3</td> 

<td align="center"> </td> 

</tr> 

<tr> 

<td width="296" align="center" height="28"> 课 程 体系 改革 </td> 

<td width="144" align="center" height="28">4</td> 

<td align="center"> </td> 

</tr> 

<tr> 

<td width="213" rowspan="3" align="center" height="28"> 师 资 队 伍 </td> 
<td width="296" align="center" height="28"> 队 伍 结构 </td> 

<td width="144" align="center" height="28">5</td> 

<td align="center"> </td> 

</tr> 

<tr> 

<td width="296" align="center" height="28"> 学 术 水 平 </td> 

<td width="144" align="center" height="28">3</td> 

<td align="center'> </td> 

</tr> 

<tr> 

<td width="296" align="center" height="28"> 教 学 研究 与 成 果 </td> 
<td width="144" align="center" height="28">3</td> 

<td align="center"> </td> 

</tr> 

<tr> 

<td width="665" colspan="3" align="center" height="28"> 

<p align="center"> 合 计 </td> 

<td align="center"> </td> 

</tr> 

</table> 

</body> 

</html> 


运行 结果 如 图 2-6 所 示 。 
【说 明 】 结 合 代码 和 图 的 效果 ， 分 析 单 元 格 如 何 实现 水 平和 垂直 方向 的 合并 。 
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课程 建设 评分 表 昌 
二 级 指标 
一 缀 指 
| 级 指标 3 证 评分 | 
和 课程 建设 规划 和 
| a 和 
队伍 结构 
师资 队伍 学 术 水 平 
教学 研究 与 成 果 
| 合计 
下 
BEd EF [ Ee] | 
图 2-6 表格 设计 


2.4 在 网 页 中 加 入 多 媒体 


2.4.1 使 用 图 像 


1. 在 网 页 中 插入 图 像 

目前 ， 在 网 页 设计 中 常常 大 量 采用 图 像 ， 网 页 的 美感 大 多 来 自 精心 处 理 的 图 像 。 可 使 
用 IMG 标记 在 网 页 中 插入 一 个 图 像 。 以 下 为 IMG 标记 最 常用 的 4 个 属性 。 
口 SRC 属性 : 给 出 图 像 文件 的 URL 地 址 ， 图像 可 以 是 JPEG 文件 、GIF 文件 或 PNG 
文件 。 
口 ALT 属性 : 给 出 图 像 的 简单 文本 说 明 ， 这 段 文本 在 浏览 器 不 能 显示 图 像 时 显示 出 
来 ， 或 图 像 加 载 时 间 过 长 时 先 显示 出 来 。 
口 HEIGHT 属性 : 设置 图 像 的 高 度 ， 所 用 单位 可 以 是 像素 或 百分数 。 
口 WIDTH 属性 : 设置 图 像 的 宽度 。 
【注意 】 如 果 只 给 出 了 高 度 或 宽度 ， 则 图 像 将 按 比例 进行 缩放 。 

2. 设置 图 像 格 式 与 布局 

当 使 用 标记 IMG 在 网 页 中 插入 一 个 图 像 时 ， 可 以 使 用 IMG 标记 的 如 下 属性 对 图 像 的 
格式 布局 进行 设置 。 

(1) 设置 图 像 的 边框 

使 用 IMG 标记 的 BORDER 属性 可 以 为 图 像 添加 边框 效果 ， 该 属性 的 取 值 为 正 整数 ， 
单位 为 像素 。 例 如 : 

<IMG SRC = "photo1jpg" ALT = "校园 风光 " BORDER = "1"> 

(2) 设置 图 像 与 文本 之 间 的 空白 

使 用 IMG 标记 的 HSPACE 和 VSPACE 属性 可 以 设置 图 像 与 周围 文本 之 间 的 间隔 ， 前 
者 指定 图 像 的 左 、 右 边 距 ， 后 者 指定 图 像 的 上 、 下 边 距 ， 两 者 的 单位 均 为 像素 。 


*。22 。 Web 编程 实践 教程 


<IMG SRC = "photo1.jpg" ALT = "校园 风光 " HSPACE = "30" VSPACE = "30"> 


(3) 设置 图 像 在 页 面 上 的 对 齐 方式 
如 果 插 入 的 图 像 在 页 面 上 单独 占 一 行 ， 则 可 以 将 IMG 标记 置 于 <P> 和 </P> 标 记 之 间 ， 
并 通过 <P> 标 记 的 ALIGN 属性 来 设置 图 像 在 页 面 上 的 对 齐 方式 。 例 如 : 
<P ALIGN = "center'><IMG SRC = "photo1jpg" ALT = "校园 风光 "></P> 


(4) 设置 图 像 与 文本 的 对 齐 方式 
当 在 页 面 中 进行 图 文 混 排 时 ， 可 以 使 用 IMG 标记 的 ALIGN 属性 来 设置 图 像 与 文本 在 
垂直 方向 的 对 齐 方式 ， 此 时 ALIGN 属性 的 取 值 如 下 。 
口 top: 图 像 与 文本 顶部 对 齐 。 
口 middle: 图 像 与 文本 中 央 对 齐 。 
口 bottom: 图 像 与 文本 底部 对 齐 。 
通过 设置 IMG 标记 的 ALIGN 属性 ， 也 可 以 在 图 像 的 左 、 右 绕 排 文本 ， 此 时 ALIGN 
属性 的 取 值 如 下 。 
口 left， 图 像 居 左 ， 文 本 居 右 。 
口 right 图 像 居 右 ， 文 本 居 左 。 
【 例 2-6】 ”图 文 混 排 


<body> 

<h2>&nbsp;&nbsp;&nbsp; 送 友 人 李白 ) </h2> 
<p><img border="0" src="x.jpg" align="left" align=top> 
<pre><font size="4"> 青 山 横 北 郭 ， 白 水 绕 东城 。 

此 地 一 为 别 ， 孤 蓬 万 里 征 。 

浮云 游子 意 ， 落 日 故人 情 。 

挥手 自 兹 去 ， 萧 萧 班 马 鸣 。</font></pre> 

</p> 

</body> 

</html> 


运行 结果 如 图 2-7 所 示 。 


= 上 对 
| 文件 四 编 缉 四 查看 中 收 疗 好 工具 0) 帮助 0 a 
和 V | 和 n ez hw ESE 
习 

送 友 人 (李白 ) 


青山 横 北 郭 , 白水 绕 东 城 。 
此 地 一 为 别 ， 孤 蓬 万 里 征 。 
浮云 游子 意 ， 落 日 故人 情 。 
挥手 自 兹 去 ， 萧 萧 班 马 鸣 。 


SE 


BE [lIE EL 


图 2-7 图 文 混 排 
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【说 明 】 此 时 IMG 标记 定义 了 两 个 ALIGN 属性 ， 一 个 是 left， 另 一 个 是 top。left 决 
定 了 图 片 在 文本 的 左边 ，top 决定 了 文本 靠 顶 边 对 齐 。 文 本 部 分 使 用 <pre> 标 记 来 保留 文件 
中 文本 内 容 的 换行 风格 ， 若 去 掉 该 标记 ， 则 文件 中 排版 的 回 车 符 将 无 效 ， 所 有 文字 内 容 会 
按 浏 览 器 宽度 进行 分 行 显示 ， 当 一 行 显示 不 下 时 将 自动 折 行 。 


2.4.2 使 用 字幕 和 背景 音乐 


1. 插入 字幕 

MARQUEE 标记 在 页 面 中 插入 一 个 字幕 ， 用 于 文本 信息 的 滚动 显示 ， 语 法 格式 如 下 : 

<MARQUEE> 要 滚动 显示 的 文本 信息 </MARQUEE> 

MARQUEE 标记 主要 有 以 下 属性 。 

(1) ALIGN: 指定 字幕 与 周围 文本 的 对 齐 方式 ， 其 取 值 可 以 是 top、middle 或 bottom。 

(2) BEHAVIOR: 指定 文本 动画 的 类 型 ， 其 取 值 可 以 是 scroll、slide 或 altemate。 

(3) BGCOLOR: 指定 字幕 的 背景 颜色 。 

(4) DIRECTION: 指定 文本 的 移动 方向 ， 其 取 值 可 以 是 down、left、right 或 up。 

(5) HEIGHT: 指定 字幕 的 高 度 ， 以 像素 或 百分比 为 单位 。 

(6) HSPACE: 指定 字幕 的 外 部 边缘 与 浏览 器 窗口 之 间 的 左 、 右 边 距 ， 以 像素 为 单位 。 

(7) LOOP: 指定 字幕 的 滚动 次 数 。 

(8) SCROLLAMOUNT: 指定 字幕 文本 每 次 移动 的 距离 ， 以 像素 为 单位 。 

(9) SCROLLDEALY: 指定 与 前 段 字 幕 文本 延迟 多 少 ms 后 重新 开始 移动 文本 。 

(10) VSPACE: 指定 字幕 的 外 边缘 与 浏览 器 窗口 之 间 的 上 、 下 边 距 ， 以 像素 为 单位 。 

【注意 】MARQUEE 标记 还 可 以 定义 鼠标 事件 ， 例 如 ， 在 标记 中 添加 以 下 属性 ， 则 鼠 
标 移 到 滚动 字幕 时 停止 滚动 ， 鼠 标 离开 时 又 开始 滚动 。 


<MARQUEE onMouseOver= this.stop();”" onMouseOut= "this.start(); "> 


2. 插入 背景 音乐 

用 <BGSOUND> 标 记 在 网 页 中 添加 背景 音乐 时 ， 该 标记 只 允许 放 在 HEAD 部 分 。 通 过 
<BGSOUND> 标 记 的 下 列 属 性 可 以 对 音乐 的 播放 进行 控制 。 

(1) BALANCE: 指定 如 何 将 声音 分 成 左 声 道 和 右 声 道 ， 取 值 为 -10000 一 +10000， 默 
认 值 为 0。 

(2) LOOP: 指定 声音 播放 的 次 数 。 如 果 设 置 为 0， 则 播放 一 次 ， 如 果 设 置 为 大 于 0， 
则 播放 指定 的 次 数 ， 如 果 设 置 为 -1， 则 声音 反复 播放 ， 直 到 页 面 印 载 为 止 。 

(3) SRC: 指定 要 播放 的 声音 文件 的 URL。 常用 的 声音 文件 类 型 是 波形 文件 (.-wav) 、 
MIDI 文 件 (mid) 、AIFF 文件 (.aif) 、AU 文 件 (.au) 及 MP3 文件 (*.mp3) 等 。 

(4) VOLUME: 指定 音量 高 低 ， 取 值 为 -10000 一 0， 默 认 值 为 0。 
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2.5 使 用 框架 


2.5.1 框架 网 页 的 基本 结构 


框架 网 页 将 浏览 器 上 的 视窗 分 成 不 同 的 区 域 ， 在 每 个 区 域 中 都 可 以 独立 显示 一 个 网 页 。 


框架 网 页 通过 一 个 或 多 个 FRAMESET 和 FRAME 标记 来 定义 。FRAMESET 表示 框架 集 ， 
FRAME 表示 一 个 框架 ， 也 常 称 作 帧 。 在 框架 网 页 中 ,将 FRAMESET 标记 置 于 HEAD 之 后 ， 
以 取代 BODY 的 位 置 ， 另 外 ， 还 可 以 使 用 noframes 标记 给 出 框架 不 能 被 显示 时 的 替换 内 容 。 


架 。 


框架 网 页 的 基本 结构 表示 如 下 : 


<HTML> 

<HEAD> 
<TITLE> 框 架 网 页 的 基本 结构 </TITLE> 
</HEAD> 

<FRAMESET> 


<noframes> 
<body> 
<p> 此 网 页 使 用 了 框架 ， 但 您 的 浏览 器 不 支持 框架 。</p> 
</body> 
</noframes> 
</FRAMESET> 
</HTML> 


【说 明 】 当 以 上 格式 中 的 某 个 <FRAME> 标 记 为 <FRAMESET> 时 ， 就 形成 了 柑 套 的 框 
也 就 是 说 ， 在 框架 集中 又 包含 了 子 框架 集 。 
在 FrontPage 中 创建 框架 的 步骤 是 : (1) 选择 “文件 ”一 “新 建 ” 一 “其 他 网 页 模板 ” 


命令 ， 将 得 到 如 图 2-8 所 示 的 “网 页 模板 ”对 话 框 。 (2) 从 该 对 话 框 的 “框架 网 页 ”选项 
卡 中 选择 某 个 模板 ， 在 右 下 方 的 “预览 ”位 置 即 可 看 到 预览 效果 ， 然 后 单 击 “ 确 定 ”按钮 。 


网 页 醒 板 | 
常 珊 。 答 架 网 Wi | 样式 表 | 
看 回国 加 
克昌 录 r 
ME 上 和 
EE 
国 国 二 
页 。 自贡 下 的 二 —— 
于 基板 / 
CD 


图 2-8 “网 页 模板 ”对 话 框 
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2.5.2 ”框架 的 设置 


1. 设置 框架 集 的 属性 

框架 集 包 含 了 如 何 组 织 各 个 框架 的 信息 ， 框 架 是 按照 行 或 列 来 组 织 的 ， 可 以 使 用 
FRAMESET 标记 的 下 列 属 性 对 框架 的 结构 进行 设置 。 

(1) COLS: 在 创建 纵向 分 隔 框架 时 ， 通 过 该 属性 指定 各 个 框架 的 列 宽 ， 取 值 有 3 种 
形式 ， 即 像素 、 百 分 比 〈%) 和 相对 尺寸 (*) 。 

(2) FRAMEBORDER: 指定 框架 周围 是 否 显示 三 维 边框 ， 如 果 取 值 为 1 (默认 值 ) 
或 yes， 则 表示 显示 三 维 边框 ;如 果 取 值 为 0 或 no， 则 表示 显示 平面 边框 。 

(3) FRAMESPACING: 指定 框架 之 间 的 间隔 ， 以 像素 为 单位 。 如 果 不 设 置 该 属性 ， 
则 框架 之 间 没 有 间隔 。 

(4) ROWS: 在 创建 横向 分 隔 框架 时 ， 通 过 该 属性 指定 各 个 框架 的 行 高 ， 取 值 有 3 种 
形式 ， 即 像素 、 百 分 比 〈%) 和 相对 尺寸 (*) ， 设 置 方法 与 COLS 属性 类 似 。 但 需要 注意 
的 是 ， 在 同一 个 框架 集 内 ，ROWS 属性 不 能 与 COLS 属性 同时 使 用 ， 若 要 创建 同时 包含 纵 
向 分 隔 框架 和 横向 分 隔 框架 ， 则 应 使 用 嵌 套 框架 ， 也 就 是 在 框架 集中 又 包含 有 框架 集 。 

2. 设置 框架 的 属性 

每 个 框架 的 属性 都 是 由 <FRAME> 标 记 设 置 的 , 包括 框架 的 名 称 、 框 架 是 否 可 以 滚动 以 
及 在 框架 中 显示 什么 文件 等 。<FRAME> 标 记 具 有 下 列 属性 。 

(1) FRAMEBORDER: 指定 框架 周围 是 否 显 示 三 维 边 框 ， 取 值 为 1 或 yes 表示 显示 
维 边 框 ， 取 值 为 0 或 no 表示 显示 平面 边框 。 默 认 值 为 1。 

(2) MARGINHEIGHT: 指定 框架 的 高 度 ， 以 像素 为 单位 。 

(3) MARGINWIDTH: 指定 框架 的 宽度 ， 以 像素 为 单位 。 

(4) NAME: 指定 框架 的 名 称 。 

(5) NORESIZE: 若 指 定 了 该 属性 ， 则 将 无 法 调整 框架 的 大 小 。 

(6) SCROLLING: 指定 框架 是 否 可 以 滚动 。 若 该 属性 设置 为 yes， 则 框架 可 以 滚动 ; 
车 该 属性 设置 为 no， 则 框架 不 能 滚动 ; 若 该 属性 设置 为 aato,， 则 在 需要 时 自动 添加 滚动 条 。 

(7) SRC: 指定 在 框架 中 显示 的 网 页 文件 的 URL 地 址 。 

【 例 2-7】 ”Java 语言 教学 课件 的 框架 设计 


-一 -一 -- -一 一- 一 -default.htm--- 一 -一 -一 -一 一 -一 一- 一- 


<head> 
<title>Java 网 络 课件 </title> 
</head> 
<frameset frameborder=0 rows="103,*" border=0 name="topframe"> 
<frame src="mytop.htm” SCROLLING="no" name="top" > 
<frameset frameborder=0 cols="185,8,*" border=0 name=mainframe > 
<frame src="chapmenu.htm" NAME="nav" SCROLLING="auto" noresize> 
<frame SRC="left.htm" NAME="control" SCROLLING="no" noresize> 
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<frame SRC="welcome.html" NAME="main" SCROLLING="auto" noresize> 
</frameset> 
</frameset> 
</html> 


访问 该 网 站 的 效果 图 如 图 2-9 所 示 。 


IE 让 
习 贺 痢 | 


EUISRCZEREE 


OzF 单 法 是 多 先是 ”时 非 下 单 上 ”名字 是 ”讨论 。 担 辣 ”单元 测试 
学 练 园 邮 


课程 介绍 器 者 所 介绍 了 学 习 方法 口 教学 大 岗 口 授课 孝 案 口 实 验 指导 口 指定 数 材 口才 考 文献 口 考核 办 法 
【教学 目标 】 
。 了 解 常见 系统 异 当 

o 分 类 


。 月 户 定义 异 常 一 继承 Exception 类 
。 擎 握 异 常人 处理 《二 
otry... catoh.... finally 
o 多 异常 处 理 《 次 序 》 
。 扫 出 异常 的 方法 一 -throw 语句 《#》 
。 在 方法 头 声明 异常 。 一 throws 子 句 〈#) 


图 2-9 Java 教学 课件 学 生 学 习 浏览 界面 


【说 明 】 该 界面 采用 了 基 套 的 框架 集 ， 最 外 层 的 框架 集 分 为 上 、 下 两 部 分 ， 顶 部 一 帧 
用 来 显示 网 站 徽标 和 功能 图 标 ， 下 面 为 一 个 框架 集 ， 由 3 帧 构成 ， 左 侧 一 帧 用 来 显示 章节 
列表 ， 也 就 是 章节 导航 选择 菜单 ， 中 间 有 一 个 很 窗 的 帧 用 来 控制 是 否 让 整个 窗 体 均 显示 教 
学 内 容 ， 右 侧 一 帧 用 来 显示 教学 内 容 。 该 网 站 在 Intemet 上 的 网 址 为 http://cai.ecjtu.jx.cn/ 
java/default.htm。 


2.6 使 用 超 链 接 


2.6.1 理解 超 链接 和 路 径 


超 链接 是 由 源 端点 到 目标 端点 的 一 种 跳 转 。 源 端点 可 以 是 网 页 中 的 一 段 文本 或 一 幅 图 
像 等 ， 而 目标 端点 可 以 是 任意 类 型 的 网 络 资源 ， 如 一 个 网 页 、 一 幅 图 像 等 。 

按照 目标 端点 的 不 同 ， 可 以 将 超 链接 分 为 以 下 几 种 形式 。 

(1) 文件 链接 : 这 种 链接 的 目标 端点 是 一 个 文件 ， 它 可 以 位 于 当前 网 页 所 在 的 服务 器 ， 
也 可 以 位 于 其 他 服务 器 。 

(2) 锚 点 链接 : 这 种 链接 的 目标 端点 是 网 页 中 的 一 个 位 置 ， 通 过 这 种 链接 可 以 从 当前 
网 页 跳 转 到 本 页 面 或 其 他 页 面 中 的 指定 位 置 。 
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(3) E-mail 链接 : 通过 这 种 链接 可 以 启动 电子 邮件 客户 端 程序 (如 Outlook 或 Foxmail 
等 ) ， 并 允许 访问 者 向 指定 的 地 址 发 送 邮 件 。 

路 径 用 来 指定 超 链接 中 目标 端点 的 位 置 ， 通 常 有 以 下 几 种 类 型 。 

(1) 绝对 路 径 : 给 出 了 目标 文件 的 完整 URL 地 址 ， 包 括 传输 协议 在 内 。 如 果 要 链接 
的 文件 位 于 外 部 服务 器 上 ， 则 必须 使 用 绝对 路 径 。 

(2) 相对 路 径 : 是 指 以 当前 文档 所 在 位 置 为 起 点 到 目标 文档 所 经 过 的 路 径 。 若 要 将 当 
前 文档 与 处 在 同一 文件 夹 中 的 另 一 个 文档 链接 ， 或 者 将 同一 站 点 中 不 同文 件 夹 下 的 文档 相 
互 链接 ， 都 可 以 使 用 相对 路 径 。 


2.6.2 创建 文件 链接 


文件 链接 是 超 链 接 中 最 常用 的 一 种 链接 形式 ， 其 基本 语法 格式 如 下 : 

<A HREF = "字符 串 " TARGET = "字符 串 " TITLE = "字符 串 "> 显 示 文 本 </A> 

其 中 各 属性 描述 如 下 。 

(1) HREF: 该 属性 是 必 选 项 ， 用 于 指定 目标 端点 的 URL 地 址 。 

(2) TARGET: 该 属性 是 可 选项 ， 用 于 指定 一 个 窗口 或 框架 的 名 称 ， 目 标 文 档 将 在 指 
定 窗 口 或 框架 中 打开 。 如 果 省 略 该 属性 ， 则 在 超 链 接 所 处 的 窗 体 或 框架 中 打开 目标 文档 。 
TARGET 属性 的 取 值 及 作用 如 表 2-4 所 示 。 


表 2-4 _ TARGET 属性 的 取 值 及 作用 


取 值 作 用 
name 在 指定 名 称 的 窗口 或 框架 中 加 载 目标 文件 
blank 在 未 命名 的 新 浏览 器 窗口 中 加 载 目标 文件 
parent 在 父 框架 页 或 窗口 中 加 载 目标 文件 
self 在 同一 框架 或 窗口 中 加 载 目标 文件 
top 将 目标 文件 加 载 显示 占据 整个 浏览 器 窗口 


需要 特别 注意 的 是 ， 在 网 页 内 通过 <base> 标 记 可 规定 默认 在 哪个 目标 框架 显示 超 链 接 
的 文档 。 例 如 ， 在 某 页 面 中 设置 <base target="main">， 则 该 页 面 中 所 有 没 用 TARGET 属性 
指定 目标 框架 的 超 链 接 将 在 名 字 为 main 的 框架 中 显示 目标 文档 。 

(3) TITLE: 该 属性 是 可 选项 ， 用 于 指定 鼠标 移 到 超 链 接 上 时 所 显示 的 标题 文字 。 


2.6.3 创建 锚 点 链接 


在 创建 锚 点 链接 时 ， 应 在 页 面 的 某 处 设置 一 个 位 置 标记 《〈 即 所 谓 锚 点 ) ， 并 为 该 位 置 
指定 一 个 名 称 ， 以 便 在 同一 页 面 或 其 他 页 面 中 引用 。 通 过 创建 锚 点 链接 ， 可 以 使 超 链接 指 
向 当前 页 面 或 其 他 页 面 中 的 指定 位 置 。 

若 要 创建 锚 点 链接 ， 则 首先 应 在 页 面 中 通过 A 标记 定义 一 个 锚 点 (也 称 书签 ) ， 通 过 
NAME 属性 为 其 命名 ， 但 不 要 在 <A> 和 </A> 标 记 之 间 放 置 任何 文字 。 例 如 ， 在 testhtm 中 
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安排 : 

<A NAME = "top"></A> 

创建 锚 点 后 ， 可 以 使 用 A 标记 来 创建 指向 该 锚 点 的 超 链接 。 例 如 ， 要 在 同一 个 页 面 中 
跳 转 到 名 为 top 的 锚 点 处 ， 可 以 使 用 以 下 HTML 代码 : 

<A HREF = "#top"> 返 回 项 部 </A> 

要 在 其 他 页 面 中 跳 转 到 该 锚 点 ， 则 可 以 使 用 以 下 HTML 代码 : 

<A HREF = "test.htm#top"> 跳 转 到 test.htm 页 的 顶部 </A> 


2.6.4 创建 邮件 链接 


使 用 A 标记 创建 邮件 链接 ， 其 HREF 属性 应 由 3 部 分 组 成 : 第 一 部 分 是 电子 邮件 协议 
名 称 mailto， 第 二 部 分 是 电子 邮件 地 址 ， 第 三 部 分 是 可 选 的 邮件 主题 ， 其 形式 为 “subject= 
主题 ”。 第 一 部 分 与 第 二 部 分 之 间 用 冒号 〈:) 分 隔 ， 第 二 部 分 与 第 三 部 分 之 间 用 问号 (?) 
分 隔 。 例 如 ; 

<A HREF = "mailto:zfding@ecjtujx.cn?subject= 小 问题 "> 给 我 写 信 </A> 

当 访问 者 在 浏览 器 窗口 中 单 击 邮件 链接 时 ， 将 会 自动 启动 电子 邮件 客户 端 程 序 ， 并 将 
指定 的 主题 填 入 “主题 ” 栏 中 。 


2.7 使 用 表单 


表单 (Form) 是 动态 网 页 编程 中 使 用 最 多 的 HTML 元 素 ， 它 是 网 页 实现 交互 功能 的 主 
要 接口 ， 用 户 通过 它 向 服务 器 提交 数据 。 表 单 中 可 以 包含 允许 用 户 进行 交互 的 各 种 控件 ， 
如 文本 框 、 列 表 框 、 复 选 框 和 单 选 按钮 等 。 


2.7.1 表单 处 理 概述 
1. 表单 的 基本 语法 


表单 用 FORM 标记 定义 ， 其 语法 格式 如 下 : 
<FORMNAME=" 字 符 串 "METHOD="getlpost" ACTION=" 字 符 串 " TARGET=" 字 符 串 "> 


</FORM> 

FORM 标记 具有 以 下 属性 。 

(1) NAME: 指定 表单 的 名 称 ， 以 标识 表单 。 

(2) METHOD: 指定 将 表单 数据 传输 到 服务 器 的 方法 。 
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(3) ACTION: 指定 将 要 接收 表单 数据 的 服务 器 端 程序 或 动态 网 页 的 网 址 。 

(4) onSubmit: 指定 提交 表单 时 调用 的 事件 处 理 程序 。 

(5) onReset: 指定 重 置 表单 时 调用 的 事件 处 理 程序 。 

(6) TARGET: 指定 表单 提交 后 打开 新 文档 的 目标 窗口 ， 其 取 值 可 参考 表 2-4。 

2. 提交 和 处 理 表单 

当 用 户 填 完 表单 数据 后 ， 单 击 “ 提 交 ” 按 钮 即 可 将 表单 数据 提交 给 Web 服务 器 上 的 表 

单 处 理 程 序 。FORM 标记 的 METHOD 属性 确定 提交 方法 ， 有 get 和 post 两 种 情形 。FORM 

标记 的 ACTION 属性 确定 表单 处 理 程序 的 URL 地 址 , 在 该 程序 中 可 以 读 取 来 自 表单 的 数据 。 
如 果 要 在 客户 端 处 理 表 单 ， 则 要 借助 事件 处 理 程序 ， 通过 onSubmit 属性 定义 表单 提交 

时 要 执行 的 客户 端 脚本 函数 或 代码 。 一 般 情况 下 ， 常 用 该 方法 在 客户 端 进行 数据 校 验 ， 校 

验 通过 后 才 将 数据 提交 给 服务 器 ， 从 而 防止 非法 数据 提交 给 Web 服务 器 。 


2.7.2 INPUT 标记 型 表单 控件 的 使 用 


将 INPUT 标记 的 TYPE 属性 设置 为 不 同 的 值 ， 可 以 创建 不 同类 型 的 输入 型 表单 控件 ， 
包括 单行 文本 框 、 密 码 框 、 复 选 框 、 单 选 按钮 、 文 件 域 及 按钮 等 。 每 个 控件 均 有 一 个 NAME 
属性 或 ID 属性 ， 用 于 指定 该 控件 的 名 称 或 标识 ， 以 便 在 脚本 代码 中 引用 该 控件 。 

1. 单行 文本 框 

单行 文本 框 用 于 获取 一 行 信息 ， 其 基本 语法 格式 如 下 : 

<INPUT TYPE = "text" NAME = "字符 串 " VALUE = "字符 串 " SIZE = "整数 " 
MAXLENGTH = "整数 "> 

其 中 ，SIZE 属性 指定 文本 框 的 宽度 ，MAXLENGTH 属性 指定 允许 在 文本 框 中 输入 的 
最 大 字符 数 ， VALUE 属性 指定 文本 框 的 默认 值 ， 如 果 不 设 置 默认 值 ， 可 省 略 该 属性 。 

2. 密码 域 

在 密码 域 中 输入 数据 时 ， 浏 览 器 以 星 号 显示 密码 。 其 基本 语法 格式 如 下 : 

<INPUT TYPE='"password" NAME=" 字 符 串 " VALUE=" 字 符 串 " SIZE=" 整 数 " 
MAXLENGTH= "整数 "> 

其 中 ，VALUE 属性 用 于 指定 密码 域 的 初始 值 ，SIZE 属性 用 于 指定 密码 域 的 宽度 ; 
MAXLENGTH 属性 用 于 指定 允许 在 密码 域 中 输入 的 最 大 字符 数 。 

3. 按钮 

用 <INPUT> 标 记 可 以 在 表单 中 添加 3 种 类 型 的 按钮 ， 即 提交 按钮 、 重 置 按钮 和 自 定义 
按钮 。 创 建 按钮 的 基本 语法 格式 如 下 : 

<INPUT TYPE="submitlresetlbutton" NAME=" 字 符 串 "VALUE=" 字 符 串 "> 

对 该 标记 的 属性 说 明 如 下 。 

(1) TYPE: 指定 按钮 的 类 型 ， 取 值 如 下 。 

口 “submit: 创建 一 个 提交 按钮 。 
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口 reset: 创建 一 个 重 置 按钮 。 

口 button: 创建 一 个 自 定义 按钮 。 

(2) VALUE: 指定 显示 在 按钮 上 的 标题 文本 。 

4. 图 形 化 按钮 

在 表单 中 可 以 用 图 片 作 为 提交 按钮 ， 从 而 起 到 美化 页 面 的 设计 效果 。 图 形 化 按钮 的 基 
本 语法 格式 如 下 : 

<INPUT TYPE="image" SRC="URL" NAME=" 字 符 串 " VALUE=" 字 符 串 "> 

其 中 ，TYPE="image" 表 示 以 一 个 图 像 作为 提交 按钮 ; SRC 属性 给 出 图 像 的 URL 地 址 ; 
VALUE 属性 提供 图 像 的 蔡 换 文本 。 

5. 复 选 框 

复 选 框 用 于 从 可 选项 中 选择 0 到 多 个 选项 ， 其 基本 语法 格式 如 下 : 

<INPUT TYPE="checkbox" NAME=" 字 符 串 " VALUE=" 字 符 串 " [CHECKED]> 选 项 文本 

其 中 ，VALUE 属性 指定 提交 时 的 值 ,， CHECKED 属性 是 可 选 的 ， 若 使 用 该 属性 ， 则 表 
示 该 复 选 框 默 认为 选中 状态 。 

在 提交 表单 时 ， 如 果 复 选 框 被 选中 ， 则 其 内 部 名 称 和 值 都 会 包含 在 表单 结果 中 。 对 于 
未 选中 的 复 选 框 ， 只 有 名 称 会 被 纳入 表单 结果 中 ， 但 值 为 空白 。 

【注意 】 对 于 同一 标识 名 的 复 选 框 ， 由 于 有 多 个 值 可 能 被 选中 ， 因 此 在 提交 表单 时 ， 
该 名 称 表单 域 的 值 是 一 个 集合 。 

6. 单 选 按钮 

单 选 按钮 用 于 从 一 组 选项 中 选择 其 中 之 一 ， 其 基本 语法 格式 如 下 : 

<INPUT TYPE="radio" NAME=" 字 符 串 "VALUE=" 字 符 串 " [CHECKED]> 选 项 文本 

其 中 ， 若 干 个 名 称 相同 的 单 选 按钮 构成 一 个 控件 组 ， 在 该 组 中 只 能 选中 一 个 选项 。 
VALUE 属性 指定 提交 时 的 值 ; CHECKED 属性 是 可 选 的 ， 若 某 个 单 选 按钮 拥有 该 属性 ， 则 
打开 表单 时 该 单 选 按钮 处 于 选中 状态 。 

在 提交 表单 时 ， 在 同一 名 称 的 单 选 按钮 的 读 取 结果 中 只 含有 被 选中 单 选 按钮 的 值 ， 如 
果 没 有 任何 单 选 按钮 被 选中 ， 则 值 为 空白 。 

7. 文件 域 

文件 域 用 于 上 传 文件 到 服务 器 ， 它 由 一 个 文本 框 和 一 个 “浏览 ”按钮 组 成 。 用 户 既 可 
以 在 文本 框 中 输入 文件 的 路 径 和 文件 名 ， 也 可 以 通过 单 击 “ 浏 览 ”按钮 从 磁盘 上 查找 和 选 
择 所 需 文 件 。 文 件 域 的 基本 语法 格式 如 下 : 

<INPUT TYPE="file" NAME=" 字 符 串 " SIZE = "整数 "VALUE = "字符 串 "> 

其 中 ，VALUE 属性 给 出 初始 文件 名 ，SIZE 属性 指定 文件 名 输入 框 的 宽度 。 

8. 隐藏 域 

要 在 表单 中 包含 不 希望 站 点 访问 者 看 见 的 信息 ， 则 可 以 在 表单 中 添加 隐藏 域 。 隐 藏 域 
常用 于 在 相 邻 页 面 间 传递 特殊 的 信息 ， 其 基本 语法 格式 如 下 : 

<INPUT TYPE="hidden" NAME=" 字 符 串 " VALUE=" 字 符 串 "> 
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其 中 ,VALUE 属性 给 出 隐藏 域 的 默认 值 。 当 提交 表单 时 , 该 隐藏 域 的 名 称 和 值 就 会 与 
可 见 表单 域 的 名 称 和 值 一 起 包含 在 表单 结果 中 。 
【注意 】 如 果 用 户 查 看 浏览 器 的 页 面 代码 ， 则 依然 可 以 看 到 隐藏 域 和 它 的 值 。 


2.7.3 ”其 他 表单 控件 


1. 滚动 文本 杠 
滚动 文本 框 用 于 输入 多 行文 本 ， 也 称 多 行文 本 框 或 称 文本 域 ， 其 基本 语法 格式 如 下 : 
<TEXTAREA NAME=" 字 符 串 "ROWS=" 整 数 "COLS=" 整 数 " [READONLY]> 


</TEXTAREA> 
其 中 ，ROWS 属性 指定 该 控件 的 高 度 〔 以 行为 单位 ) ; COLS 属性 指定 该 控件 的 宽度 
(以 字符 为 单位 ) ; READONLY 属性 指定 滚动 文本 框 的 内 容 不 被 用 户 修改 。 
<TEXTAREA> 和 </TEXTAREA> 标 记 之 间 的 文本 将 作为 该 控件 的 初始 值 。 
2. 下 拉 列 表 框 
下 拉 列 表 框 用 于 从 多 个 列表 项 中 选择 一 个 或 多 个 ， 其 基本 语法 格式 如 下 : 
<SELECT NAME = "字符 串 " SIZE = "整数 " [MULTIPLE]> 
<OPTION [SELECTED] VALUE = "字符 串 "> 选项 1</OPTION> 
<OPTION [SELECTED] VALUE = "字符 串 "> 选项 2</OPTION> 
</SELECT> 
其 中 , SIZE 属性 指定 在 列表 中 一 次 可 以 看 到 的 选项 数 日 ; MULTIPLE 指定 是 否 允 许 作 
多 项 选择 ， 如 果 无 该 选项 ， 则 只 能 选择 一 项 ，<OPTION> 标 记 将 每 个 选项 列 出 来 ， 其 中 ， 
SELECTED 属性 指定 该 选项 的 初始 状态 为 选中 。 
3. 表单 控件 分 组 
为 了 美化 表单 控件 的 页 面 布局 ， 可 以 使 用 <FIELDSET> 标 记 对 表单 控件 进行 分 组 。 注 
意 ，<FIELDSET> 标 记 必 须 以 <LEGEND> 开 头 ， 以 提供 控件 组 的 标题 ， 在 <LEGEND> 之 后 
可 以 跟 其 他 表单 控件 ， 也 可 以 嵌 套 <FIELDSET>。 其 基本 语法 格式 如 下 : 
<FIELDSET> 
<LEGEND> 控 件 组 标题 <LEGEND> 
组 内 表单 控件 
</FIELDSET> 
【 例 2-8】 表单 控件 分 组 的 应 用 


-ex2-8.htm: se | 


<html> 
<body> 
<center> 
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<FIELDSET style="left: .9em; top: 26.1em; width: 513px; height: 264px;"> 
<LEGEND style="color:green;"> 课 程 访问 设置 ...</LEGEND> 
<form action="systemsetupwrite.asp" method="POST"> 
<table border="0" width="100%" height="163"> 
<tr> 
<td align="right"> 
<img border="0" src="images/edit1.gif" width="16" height="16"></td> 
<td align="center" width="156"> 学 生 注 册 批 准 方式 ? </td> 
<td align=CENTER width="60%"> 
<table border="0" width="76%" > 
<tr><td ALIGN=center height="40" > 自动 批准 
<input type="radio" name="allow" value="True” checked ></td> 
<td ALIGN=center> 教 师 批准 
<input type="radio" name="allow” value="False" > 
</td> 
</table> 
</td> 
</tr> 


</table> 

<br> 

<input type="submit" name="b1" value=" 提 ” 交 "> 
</form> 

</FIELDSET> 

</center> 

</body> 

</html> 


在 网 络 教学 平台 中 该 程序 的 运行 结果 如 图 2-10 的 右 下 帧 所 示 。 

【说 明 】 本 例 是 网 络 教学 系统 中 课程 访问 设置 表单 ， 实 际 应 用 中 表单 各 控件 的 设置 值 
来 自 数据 库 ， 这 里 将 其 显示 内 容 静 态 化 为 HTML 程序 。FIELDSET 标记 中 的 Style 属性 的 
定位 样式 设置 表单 分 组 控件 在 页 面 中 的 显示 位 置 。 
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图 2-10 表单 控件 分 组 的 应 用 
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本 章 小 结 


HTML 是 网 页 设计 的 基本 语言 ， 熟 悉 常 用 HTML 标记 的 使 用 是 Web 编程 的 一 项 基本 
功 。 本 章 介 绍 了 HTML 语言 常用 标记 的 功能 和 应 用 特点 。 在 实际 应 用 中 虽然 可 借助 
FrontPage 和 Dreamweaver 等 工具 制作 网 页 ， 并 自动 生成 各 类 标记 ， 但 由 于 ASP 程序 与 网 
页 内 容 是 混合 在 一 起 的 ， 因 此 在 Web 编程 中 用 户 必须 对 各 类 标记 有 足够 的 了 解 ， 这 样 才能 
正确 、 灵 活 地 进行 编程 处 理 ， 并 根据 需要 合理 规划 和 部 署 网 页 内 容 。 


习题 


1. 选择 题 
(1) 若 要 限制 在 单行 文本 框 中 所 能 输入 的 最 多 字符 数 ， 应 使 用 <INPUT> 标 记 的 (  ) 
属性 。 

A. SIZE B. VALUE C. TABINDEX D. MAXLENGTH 
(2) 下 列表 单字 段 中 适合 作为 单一 的 选择 题 使 用 的 是 和 

A. 单行 文本 框 B. 复 选 框 C. 单 选 按钮 D. 下 拉 列 表 框 
(3) 下 列表 单字 段 中 适合 用 来 输入 网 上 招聘 的 自我 介绍 内 容 的 是 〈 js 

A. 复 选 框 B. 多 行文 本 框 ”C. 单行 文本 框 ”D. 下 拉 列 表 框 
(4) 有 关 单 选 按钮 的 语句 ， 下 面 说 法 错误 的 是 〈 Ys 

A. 单 选 按 钮 适合 用 来 询问 只 有 一 个 答案 的 问题 

B. 同一 组 单 选 按钮 的 每 个 单 选 按钮 的 名 称 必 须 相 同 

C. <INPUT> 标 记 的 TYPE 属性 需 设 置 为 CHECKBOX 

D. 同一 组 单 选 按钮 的 每 个 单 选 按钮 通过 VALUE 属性 区 分 
(5) 若 要 设置 下 拉 列 表 的 各 个 选项 ， 可 以 使 用 的 标记 是 ) 


A. <OPTION> B, <LD> C. <SELECT> DD. <OL> 
(6) 在 HTML 中， 标记 <pre> 的 作用 是 〈 ) 。 
A. 标题 标记 B. 预 排版 标记 C. 转行 标记 D. 文字 效果 标记 


(7) 车 要 将 表单 数据 以 字符 串 的 方式 附加 在 网 址 的 后 面 返回 服务 器 端 ， 必 须 将 
<FORM> 标记 的 METHOD 属性 设置 为 ( Ya 
A. POST B. GOT C. GET D. QUERY 
(8) 在 不 指定 特殊 属性 的 情况 下 ， 可 以 手动 输入 文本 的 HTML 标签 的 是 〈 ji 
A. <TEXTAREA></TEXTAREA> B. <INPUT type="text"/> 
C. <INPUT type="hidden"/> D. <DIV></DIV> 
(9) 对 网 页 标题 的 描述 ， 下 述说 法 正确 的 是 站 名 
A. <title>…</title> 之 间 的 内 容 为 网 页 标题 
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B. <head>…</head> 之 间 的 内 容 为 网 页 标题 
C. 网 页 标题 一 定 要 有 ， 和 否则 网 页 显示 不 出 来 
D. 网 页 标题 内 容 会 在 网 页 左下 角 以 滚动 形式 显示 出 来 
2. 制作 题 
(1) 利用 表格 标记 制作 本 学 期 的 课程 表 。 
(2) 制作 一 个 本 班 同学 录 的 页 面 ， 表格 数据 项 包括 姓名 、 地 址 、 联 系 电话 、 电 子 邮 件 
等 ， 表 头 用 灰色 背景 ， 表 格 内 的 文字 用 红色 ， 表 格 的 边框 用 绿色 。 
(3) 用 表格 进行 定位 ， 制 作 一 个 如 图 2-11 所 示 的 组 卷 选 题 设置 页 面 。 
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上 第 弄 miscript 放 细 
所 ” 蔓 人 章 ASP 对 象 
口 ，” 和 5 章 ASF 访问 数据 库 


图 2-11 组 卷 选 题 设置 页 面 


(4) 设计 一 个 个 人 主页 ， 该 主页 中 包括 个 人 基本 信息 ， 如 姓名 、 出 生年 月 、 性 别 、 籍 
贯 以 及 成 长 简历 、 照 片 等 ， 用 表格 进行 布局 设计 。 另 有 一 些 信息 通过 超 链接 的 形式 增加 ， 
如 个 人 兴趣 、 主 要 业绩 等 可 安排 在 专门 的 页 面 中 用 列表 项 列 出 。 

(5) 编写 一 个 框架 网 页 ， 在 项 部 创建 一 个 用 于 显示 网 站 标题 的 横幅 框架 ， 在 左边 创建 
一 个 用 于 显示 网 页 链接 的 目录 框架 ， 并 在 右 下 方 创 建 一 个 用 于 显示 内 容 的 主要 框架 。 要 求 
在 目录 框架 中 单 击 不 同 链接 时 ， 在 主要 框架 中 显示 相应 的 网 页 。 
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3.1 VBScript 概述 


VBScript 是 一 个 以 Visual Basic 语言 为 基础 的 轻 量 级 程序 语言 , 它 是 Visual Basic 语言 的 
一 个 子 集 。 最 初 , VBScript 用 于 编写 客户 端 事件 驱动 代码 以 扩大 HTML 的 功能 ， 如 在 客户 端 
进行 输入 数据 的 有 效 性 验证 ， 防 止 浏览 器 将 无 效 数 据 发 送 给 服务 器 。 随 着 ASP 技术 的 出 现 ， 
VBScript 将 它 的 功能 扩展 到 了 服务 器 上 ， 目 前 ，VBScript 的 主流 应 用 是 编写 服务 器 端的 脚本 
代码 。 因 此 ， 本 章 介绍 的 内 容 主 要 是 VBScript 的 语法 和 函数 ， 将 略 去 用 VBScript 进行 客户 
端 事件 编程 的 内 容 ， 客 户 端的 事件 编程 通常 使 用 JavaScript， 这 将 在 后 续 章节 中 进行 介绍 。 
在 服务 器 端的 ASP 程序 中 可 使 用 <% 和 %> 作 为 识别 标记 符 来 插入 VBScript 代码 , 这 些 
代码 将 在 Web 服务 器 端 解释 执行 。 
在 网 页 中 安排 在 客户 端 执行 的 VBScript 代码 ， 应 使 用 <scrip 尼 标记 。 有 两 种 方式 : 一 种 
方式 是 将 该 标记 的 type 属性 赋值 为 "text/vbscript"; 另 一 种 方式 是 使 用 script 标记 的 
language="vbscript"， 但 language 这 个 属性 在 W3C 的 HTML 标准 中 已 不 再 推荐 使 用 。 

【 例 3-1】 浏览 器 端的 VBScript 代码 


<html> 
<head><title> 简 单 的 VBScript 示例 </title></head> 
<body> 
<p> 你 会 看 到 一 个 消息 框 ， 在 此 行文 字 显示 之 后 弹出 。</p> 
<script type="text/vbscript"> 
MsgBox("Hello,World!") 
</script> 
</body> 
</html> 


在 浏览 器 页 面 中 将 弹出 一 个 对 话 框 ， 如 图 3-1 所 示 。 
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图 3-1 VBScript 示例 
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【说 明 】 此 时 ，MsgBox 为 VBScript 的 一 个 内 部 函数 ， 用 于 在 客户 端 弹出 消息 框 显示 
信息 ， 详 见 本 章 第 3.5 节 的 相关 内 容 。 

在 客户 端 代码 中 ，VBScript 可 以 放 在 网 页 的 Body 或 Head 中 。 一般 将 函数 定义 的 代码 
集中 放置 在 Head 中 。 


3.2 VBScript 的 数据 表示 


3.2.1 VBScript 的 数据 类 型 


VBScript 中 只 有 一 个 基本 数据 类 型 ， 即 Variant， 也 称 为 变 体 类 型 ， 但 变量 可 根据 所 赋 
值 的 不 同 而 代表 不 同类 型 。 对 于 Variant 来 说 ， 当 其 用 于 数字 上 下 文中 时 作为 数字 处 理 ， 而 
当 其 用 于 字符 串 上 下 文中 时 作为 字符 串 处 理 。 除 数字 和 字符 串 外 ，VBScript 中 还 包括 布尔 
类 型 、 时 间 类 型 等 ， 它 们 被 称 为 数据 子 类 型 。 表 3-1 中 列举 了 VBScript 中 的 数据 子 类 型 。 


表 3-1 VBScript 中 的 数据 子 类 型 


子 类 型 描述 
Boolean 布尔 值 ， 其 值 是 True 或 False 
Byte 0 一 255 之 间 的 整数 
Integer 整数 
Long 长 整数 
Single 单 精度 浮 点 数 
Double 双 精 度 浮 点 数 
Date 表示 日 期 的 数值 ， 用 # 号 括 起 来 ， 如 #2001-4-10#、#2003-9-12 8:20:10 AM# 
String 变 长 字符 串 ， 最 大 长 度 可 为 20 亿 个 字符 
Object 对 象 类 型 ， 用 来 引用 程序 所 能 识别 的 任何 对 象 


3.2.2 VBScript 的 常量 、 变 量 与 数组 变量 


1. 常量 

常量 的 值 是 固定 的 ， 它 可 以 用 来 代表 字符 串 、 数 字 和 日 期 等 常数 ， 一 经 声明 ， 其 值 将 
不 能 再 更 改 。 声 明 常 量 时 使 用 了 CONST 语句 ， 例 如 : 

CONST pi=3.14159 


这 里 ， 常 量 pi 被 分 配 了 值 3.14159。 在 脚本 中 将 不 能 给 pi 分 配 新 值 。 
VBScript 定义 了 一 些 固 有 常量 ， 如 表 3-2 所 示 。 
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表 3-2 VBScript 的 固有 常量 


常量 名 称 常量 含义 
True 布尔 类 型 的 真 值 
False 布尔 类 型 的 假 值 
Eipty 声明 一 个 变量 ， 如 果 为 该 变量 赋值 ， 则 该 变量 的 值 为 Empty。 对 于 数值 变量 ， 其 
值 为 0， 对 于 字符 串 变量 ， 其 值 为 空 串 
Null 表示 空 值 ， 用 来 表示 一 个 变量 不 包含 任何 有 效 数据 
Nothing 指示 对 象 变量 无 关联 的 实际 对 象 
vbCr 表示 回 车 符 
vbCrLf 表示 回 车 /换行 符 
vbTab 表示 制 表 符 
2. 变量 


VBScript 变量 命名 要 求 以 字母 开头 ， 不 能 包含 句号 〈.) 字符 ， 且 长 度 不 能 超过 255 个 
字符 。 在 VBScript 代码 中 ， 可 以 先 声明 变量 再 使 用 变量 〈 显 式 声明 ) ， 也 可 以 不 声明 变量 
直接 使 用 〈 隐 式 声明 ) 。 

显 式 声明 变量 使 用 Dim 语句 ， 例 如 : 


Dim a,b,c "声明 3 个 变量 


a=5 为 变量 a 赋值 
a=a+1 ' 将 变量 a 的 值 增加 1 


在 ASP 代码 中 可 用 Option Explicit 语句 强制 要 求 程序 中 的 变量 必须 显 式 声 明 。 例 如 : 


<% @ Language=VBScript %> 
<% Option Explicit %> 
<% dim usename 
Dim account_number 
%> 


变量 的 作用 域 也 称 变量 的 有 效 范 围 ， 由 声明 它 的 位 置 决 定 。 如 果 在 过 程 中 声明 变量 ， 
则 只 有 该 过 程 中 的 代码 可 以 访问 或 更 改变 量 值 ， 此 时 变量 具有 局 部 作用 域 ， 并 被 称 为 过 程 
级 变量 。 如 果 在 过 程 之 外 声明 变量 ， 则 该 变量 称 为 Script 级 变量 或 全 局 变量 ， 则 同一 程序 
文件 的 任何 脚本 代码 均 可 访问 或 修改 该 变量 的 值 。 

3. 数组 变量 

在 成 批 处 理 数 据 时 ， 常 用 到 数组 。 数 组 是 同一 名 称 的 元 素 的 集合 ， 可 通过 下 标 区 分 访 
问 各 个 元 素 。VBScript 中 的 数组 具有 如 下 特点 : 

(1) 要 先 定义 ， 后 使 用 。 

(2) 下 标 从 0 开始 。 

(3) 定义 数组 时 可 给 出 数组 的 上 界 。 

(4) 一 个 数组 中 可 含有 不 同类 型 的 数组 元 素 。 
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声明 数组 变量 时 变量 名 后 面 带 有 括号 0。 例 如 : 


Dim A(10) 
表示 声明 包含 11 个 元 素 的 一 维 数组 ， 这 些 元 素 分 别 是 A(0)、A(1)、…… A(10)。 
通过 下 标 变量 引用 数组 中 某 个 特定 的 元 素 。 例 如 ， 给 下 标 为 5 的 数组 元 素 赋值 : 
A(5) = 10 


声明 多 维 数组 时 用 逗号 分 隔 括号 中 表示 各 维 数组 上 界 的 数字 。 例 如 ， 以 下 声明 一 个 6 
行 11 列 的 二 维 数组 : 

Dim MyTable(5, 10) 

另外 ， 也 可 以 声明 动态 数组 ， 即 运行 时 数组 的 大 小 可 发 生变 化 。 对 动态 数组 的 最 初 声 
明 使 用 Dim 语句 或 ReDim 语句 。 但 是 对 于 动态 数组 ， 则 括号 中 不 包含 任何 数字 。 例 如 ; 


Dim MyArray() 
ReDim AnotherArray() 


要 使 用 动态 数组 ， 必 须 随 后 使 用 ReDim 语句 确定 维 数 和 每 一 维 的 大 小 。 在 下 面 的 代码 
中 ，ReDim 将 动态 数组 的 初始 大 小 设置 为 23， 而 后 面 的 ReDim 语句 将 数组 的 大 小 调整 为 
30。 注 意 ， 重 新 调整 动态 数组 大 小 的 次 数 是 没有 任何 限制 的 。 


ReDim MyArray(25) 
ReDim Preserve MyArray(30) 


其 中 ， 使 用 Preserve 关键 字 规定 在 重新 调整 大 小 时 保留 数组 的 内 容 ， 但 应 注意 ， 将 数 
组 的 大 小 调 小 时 ， 有 可 能 丢失 部 分 存 于 数组 中 的 数据 。 
3.2.3 ” VBScript 运算 符 

VBScript 有 一 套 完整 的 运算 符 ， 包 括 算术 运算 符 、 关 系 运算 符 、 连 接 运 算 符 和 逻辑 运 
算 符 。 其 中 ， 连 接 运算 符 “&” 可 实现 字符 串 与 任意 类 型 数据 的 拼接 。 

1. 算术 运算 符 〈 如 表 3-3 所 示 ) 


表 3-3 算术 运算 符 


描述 
两 个 数 的 整除 结果 

求 两 个 数值 相 除 的 余数 
加 


算术 运算 符 的 优先 级 顺序 是 : 负 号 一 求 寡 一 乘 、 除 一 整除 一 求 余 一 加 、 减 。 
其 中 ， 乘 和 除 为 同一 级 别 ， 加 和 减 为 同一 级 别 。 
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2. 关系 运算 符 ( 如 表 3-4 所 示 ) 
表 3-4 关系 运算 符 


Is 判断 两 个 对 象 引用 是 否 引用 同 趟 对 和 
所 有 关系 运算 符 的 优先 级 相同 。 
3. 逻辑 运算 符 〈 如 表 3-5 所 示 ) 
表 3-5 ”有 逻辑 运算 符 


运 算 符 描述 
Not 异 或 
And 等 价 
Or 隐 含 


运算 符 的 优先 级 顺序 是 : Not 一 And 一 Or 一 Xor 一 Eqv 一 Imp。 

4. 运算 符 的 优先 级 

当 表达 式 中 包含 多 个 运算 符 时 ， 将 按 预 定 顺序 计算 每 一 部 分 ， 该 顺序 被 称 为 运算 符 优 
先 级 。 可 以 使 用 括号 越过 这 种 优先 级 顺序 ， 运 算 时 ， 总 是 先 执行 括号 中 的 运算 符 ， 然 后 再 
执行 括号 外 的 运算 符 。 但 应 在 括号 中 仍 遵循 运算 符 优先 级 。 

当 表 达 式 中 包含 多 种 运算 符 时 ， 首 先 计 算 算 术 运 算 符 ， 然 后 计算 关系 运算 符 ， 最 后 计 
算 逻 辑 运算 符 。 注 意 ， 同 一 级 别 优先 级 按 从 左 到 ep 

字符 串 连 接 运 算 符 (&) 不 是 算术 运算 符 ， 但 是 在 优先 级 顺序 中 ， 它 排 在 所 有 算术 运 
算 符 之 后 和 所 有 关系 运算 符 之 前 。 例 如 ， Da 


<script type="text/vbscript"> 
x="welcome"& vbCrLf & 2008 & " beijing!" 


MsgBox(x) 
</script> 
在 网 页 的 浏览 界面 中 将 弹出 如 图 3-2 所 示 的 对 VBScript 区 
话 框 。 二 


需要 注意 的 是 ， 使 用 加 号 〈+) 也 可 以 进行 字符 
串 的 拼接 , 但 不 能 用 加 号 将 字符 串 与 其 他 类 型 的 数据 
拼接 。 以 下 表达 式 为 非法 表示 ， 不 能 完成 计算 。 2 

x="Wwelcome"& vbCrLf + 2008 &" beijing” 

但 如 果 字 符 串 可 转换 为 数值 数据 , 则 可 以 将 字符 串 与 数据 进行 相 加 。 例如 , x="12.4"+1， 
则 x 的 结果 为 13.4。 
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3.3 ”VBScript 的 流程 控制 语句 


按照 一 般 程 序 的 流程 结构 类 型 ， 即 顺序 结构 、 分 支 结构 和 循环 结构 3 种 类 型 ， 可 以 将 
VBScript 中 的 流程 控制 语句 分 为 两 类 。 第 一 类 为 分 支 结构 的 流程 控制 语句 ， 第 二 类 为 循环 
结构 的 流程 控制 语句 。 分 支 结构 的 流程 控制 语句 包含 让 语句 和 Select Case 语句 ， 而 循环 结 
构 的 流程 控制 语句 则 有 众多 情形 。 


3.3.1 ji 语句 


1. 单行 这 语句 

格式 : 下 ”条件 表 达 式 THEN 语句 体 1 [ELSE 语句 体 2] 

功能 :如 果 条 件 表达 式 结果 为 真 ， 则 执行 THEN 后 的 语句 体 1， 否 则 执行 ELSE 后 的 
语句 体 2， 如 果 无 ELSE 部 分 ， 则 当 条 件 不 满足 时 这 条 语句 就 什么 也 不 做 。 

例如 : 

if time > #6:00:00pm# then MsgBox("Good Evening! ") 

这 里 , 利用 time 函数 获得 当前 的 时 间 值 ， 如 果 时 间 超 过 了 下 午 6 点 , 则 弹出 显示 Good 
Evening 的 消息 框 。 


2. 块 这 语句 

格式 : 

IF 条 件 表达 式 THEN 
语句 体 1 

[ELSE 
语句 体 2] 

END IF 


其 中 , ELSE 分支 可 以 没有 , 但 END 正 不 可 少 , 因为 只 有 遇 到 它 才 代表 语句 块 的 结束 。 
与 单行 让 不 同 的 是 ， 语 句 体 1 和 语句 体 2 中 可 放置 多 条 语句 。 
【 例 3-2】 在 客户 端 脚 本 中 使 用 站 语句 举例 


-一 -一 -一 -一 -一 --------- - -ex3-2.htm- -一 -一 一 一 一 一 一 一 一 一 
<script type="text/vbscript"> 
VvMon = Month(Date) “Date 函数 返回 当前 的 系统 日 期 ，Month 求 日 期 的 月 份 
ifvMon >= 3 and vMon <11 then 
MsgBox(" 太 好 了 ") 
document.write(" 适 合 出 去 玩 。") 
else 
MsgBox(" 除 非 喜欢 玩 冰 ") 
document.write(" 天 太 洽 了 ， 呆 在 家 吧 。") 
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end if 
</script> 


【说 明 】 该 客户 端 脚 本 程序 利用 document 对 象 的 write 方法 在 页 面 上 输出 信息 。 输 出 
信息 的 位 置 取 决 于 脚本 代码 在 页 面 中 的 位 置 。 这 里 用 到 第 5 章 将 要 介绍 的 浏览 器 对 象 模型 ， 
document 代表 当前 页 面 文档 对 象 。 

【思考 】 将 上 述 代码 改 成 在 服务 器 端 执行 的 脚本 代码 ， 应 如 何 修改 程序 ? 

if…then*…else 语句 的 一 种 变形 是 从 多 个 条 件 中 选择 ， 即 添加 一 个 或 多 个 elseif 子 句 以 
扩充 if…then*…else 语句 的 功能 。 
【 例 3-3】 根据 输入 的 学 生成 绩 输出 不 同 的 信息 


-> EX3-3.htM- 
<script type="text/vbscript"> 
s = cint(InputBox(" 请 输入 一 个 成 绩 ","")) 
if s<60 then 
document.write( "不 及 格 ") 
elseif s<70 then 
document.write(" 及 格 ") 
elseif s<80 then 
document.write( "中 ") 
elseif s<90 then 
document.write( " 良 ") 
else 
document.write(" 优 ") 
end if 
</script> 


使 用 多 个 elseif 子 名 会 变 得 很 累 更， 在 多 个 条 件 中 进行 选择 的 更 好 方法 是 使 用 Select 


Case 语句 。 
3.3.2 Select Case 语句 


Select Case 结构 可 以 从 多 个 语句 块 中 选择 执行 其 中 的 一 个 ， 该 结构 在 其 开始 处 使 用 一 
个 只 计算 一 次 的 简单 测试 表达 式 。 表 达 式 的 结果 将 与 结构 中 每 个 Case 的 值 比较 。 如果 匹 配 ， 
则 执行 与 该 Case 关联 的 语句 块 ， 语 句 格式 如 下 : 

SELECT CASE 测试 表达 式 

CASE 表达 式 1 
语句 体 1 

CASE 表达 式 2 
语句 体 2 

CASE 表达 式 n 
语句 体 n 
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CASE ELSE 
语句 体 
END SELECT 
【 例 3-4】 Select Case 语句 的 使 用 


CX3-4.htMm------ 一 一 
<script type="text/vbscript"> 
vDay = WeekDay(Date) 
Select Case vDay 
Case 1 
document.write(" 今 天 是 星期 天 。") 
Case 2 
document.write(" 今 天 是 星期 一 。") 
Case3 
document.write(" 今 天 是 星期 二 。") 
Case 4 
document.write(" 今 天 是 星期 三 。") 
Case5 
document.write(" 今 天 是 星期 四 。") 
Case6 
document.write(" 今 天 是 星期 五 。") 
Case else 
document.write(" 今 天 是 星期 六 。") 
end select 
</script> 


【说 明 】 这 里 用 Date 函数 获得 当前 日 期 ， 用 WeekDay 函数 计算 当前 日 期 是 星期 儿 。 

【注意 】Select Case 结构 只 计算 开始 处 的 一 个 表达 式 〈 只 计算 一 次 ) ， 而 这"…then…elseif 
结构 计算 每 个 elseif 语句 的 表达 式 ， 这 些 表 达 式 可 以 各 不 相同 。 仅 当 每 个 elseif 语句 计算 的 
表达 式 都 相同 时 ， 才 可 以 使 用 Select Case 结构 代替 if…then*…elseif 结构 。 


3.3.3 ”循环 语句 


在 VBScript 中 可 使 用 下 列 循环 语句 。 

口 Do…Loop: 当 (或 直到 ) 条 件 为 True 时 循环 。 

口 While…Wend: 当 条 件 为 True 时 循环 。 

口 ”For…Next: 指定 循环 次 数 ， 使 用 计数 器 重复 运行 语句 。 

口 、For Each…Next: 对 于 集合 中 的 每 项 或 数组 中 的 每 个 元 素 ， 重 复 执行 一 组 语句 。 
1. Do…Loop 循环 
Do 循环 一 般 用 于 事先 不 知道 循环 次 数 的 循环 ， 可 分 为 使 用 While 检查 条 件 和 Until 检 

查 条 件 两 种 情形 。 
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(1) 使 用 While 检查 条 件 

只 要 条 件 为 True， 就 会 进行 循环 。 有 以 下 两 种 形式 : 
@ 将 条 件 检查 放 在 循环 开始 (Do While…Loop) 。 
@ 将 条 件 检 查 放 在 循环 末尾 (Do…Loop While) 。 
以 下 为 Do While…Loop 循环 的 客户 端 脚 本 代码 示例 : 
counter=0 
myNum = 20 
Do While myNum > 10 

myNum = myNum - 1 

counter = counter+ 1 


Loop 
MsgBox "循环 重复 了 “" & counter& " 次。" 


以 下 为 Do…Loop While 循环 的 客户 端 脚 本 代码 示例 : 


n=n+1 
fac=fac*n 
Loop Whilen < 10 
MsgBox n & "!=" & fac 


【思考 】 以 上 两 个 程序 输出 的 结果 分 别 如 何 ? 
(2) 使 用 Until 检查 条 件 
只 要 条 件 为 False， 就 会 进行 循环 。 有 以 下 两 种 形式 : 
Q@ 将 条 件 检查 放 在 循环 开始 (Do Until…Loop) 。 
@ 将 条 件 检查 放 在 循环 末尾 (Do…Loop Until) 。 
以 下 为 Do Until…Loop 循环 的 客户 端 脚 本 代码 示例 : 
counter =0 
num = 10 
Do Until num = 5 
num=num-1 
counter = counter + 1 


Loop 
MsgBox "循环 重复 了 “" & counter &" 次 。" 


【 注意】 在 Do 循环 内 可 用 Exit Do 语句 在 特定 条 件 下 退出 循环 。 
2. While…Wend 循环 
While…Wend 语句 是 从 早期 的 Basic 语言 中 保留 下 来 的 一 种 循环 ， 语 法 格式 如 下 : 
While 条 件 
循环 体 
Wend 
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功能 等 价 于 如 下 形式 的 do while 循环 : 
do while 条 件 
循环 体 
loop 
3. For…Next 循环 
For…Next 语句 用 于 可 事先 计算 循环 次 数 的 循环 。 循 环 控制 变量 的 值 由 初 值 变化 到 终 值 
为 止 ， 随 每 一 次 循环 按 步 长 增加 或 减少 。 其 语法 格式 如 下 : 
for 变量 = 初 值 to 终 值 [step 步 长 ] 
语句 体 
Dext 
其 中 ， 语 句 体 中 可 包括 exit for 语句 ， 用 来 在 特定 条 件 下 退出 循环 。 
要 使 控制 变量 的 值 递减 变化 ， 可 将 步 长 设 为 负 值 。 此 时 终 值 必须 小 于 初 值 。 在 下 面 的 
示例 中 ， 变 量 n 每 次 减 2。 循 环 结束 后 ，total 的 值 为 16、14、12 和 10 的 累加 和 。 
Forn= 16To 10 Step -2 


total = total + n 
Next 


4. For Each…Next 循环 
For Each…Next 循环 用 于 遍历 访问 集合 或 数组 中 的 元 素 。 例 如 ， 以 下 ASP 代码 使 用 了 
两 种 循环 访问 数组 中 的 元 素 ， 前 面 for 循环 为 数组 赋值 ， 后 面 for each 循环 输出 所 有 数组 元 
素 的 值 。 
<% 
dim x(10) 
for k=0 to 9 
x(k)= k+1 
next 
foreach minx 
response.write m & "&nbsp;” 
next 
9%> 


3.4 VBScript 的 过 程 定 义 与 调用 


在 VBScript 中 ， 可 以 将 完成 特定 功能 的 一 段 程序 定义 为 过 程 ， 按 照 是 否 有 返回 值 可 将 
过 程 分 为 两 类 ， 即 Sub 过 程 和 Function 过 程 。 
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3.4.1 Sub 过 程 及 其 调用 


Sub 过 程 是 无 返回 值 的 过 程 ， 一 般 格式 如 下 : 
Sub 过 程 名 (形式 参数 列表 ) 
语句 块 
[exit sub] 
End Sub 
其 中 ， 形 式 参数 列表 中 列 出 了 所 有 的 参数 ， 各 参数 之 间 用 逗号 分 隔 。 如 果 过 程 定义 的 
小 括号 内 未 列 出 任何 参数 , 则 该 过 程 称 为 无 参 过程 。 过 程 体 中 的 exit sub 语句 用 于 在 特定 条 
件 下 退出 过 程 。 
下 面 是 一 个 带 有 两 个 参数 的 Sub 过 程 ， 其 功能 是 用 消息 框 显示 两 个 参数 的 乘积 值 。 
Sub myMulti(no1, no2) 


MsgBox(no1*no2) 
End Sub 


调用 Sub 过 程 有 两 种 方法 : 一 种 是 直接 通过 输入 过 程 名 后 跟 相 应 的 实 参 ， 另 一 种 是 用 
Call 语句 调用 ， 注 意 此 时 必须 将 所 有 参数 包含 在 括号 之 中 。 例 如 : 


Call myMulti(8,9) 
myMulti 8,9 


【注意 】 当 不 使 用 Call 语句 调用 时 ， 不 加 括号 ; 当 使 用 Call 语句 时 ， 要 用 括号 包含 所 
有 参数 。 


3.4.2 Function 过 程 及 其 调用 


Function 过 程 也 称 为 函数 ， 通 过 函数 名 返回 一 个 值 ， 在 函数 体内 必须 给 函数 名 赋值 。 
函数 的 语法 格式 如 下 : 
Function 函数 名 (形式 参数 ) 
语句 块 
[exit function] 
函数 名 = 函数 的 返回 值 
End Function 
其 中 ，exit funetion 语句 用 于 在 特定 条 件 下 结束 函数 的 执行 。 
以 下 Function 过 程 的 返回 值 是 两 个 参数 中 的 最 大 数 。 
Function max(no1, no2) 


ifno1> no2 then max= no1 else max= no2 
End Function 


函数 调用 可 出 现在 表达 式 中 ， 当 调用 Function 过 程 时 ， 必 须 为 函数 传递 实际 参数 。 
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例如 ，x =max(50, 35)+10， 则 x 的 结果 为 60。 
3.5 ” VBScript 中 的 内 部 函数 


3.5.1 转换 函数 


通过 转换 函数 将 子 数 据 类 型 转换 成 需要 的 数据 类 型 ， 常 用 的 转换 函数 如 下 。 
(1) CDate(Variant): 转换 成 日 期 子 类 型 。 

(2) CStr(Variant): 转换 成 字符 串 子 类 型 。 

(3) CByte(Variant): 转换 成 Byte 子 类 型 。 

(4) CInt(Variant): 转换 成 整数 子 类 型 。 

(5) CBool(Variant): 转换 成 布尔 子 类 型 。 

另外 ， 还 有 两 个 经 常 使 用 的 函数 是 字符 与 ASCII 码 的 转换 函数 。 

(1) chr(int): 求 ASCII 码 对 应 的 字符 。 

(2) asc(string): 求 字符 串 中 第 一 个 字符 的 ASCII 码 。 


3.5.2 ”字符 串 函 数 


在 VBScript 中 包含 有 很 多 处 理 字符 串 的 函数 ， 常 用 的 字符 串 函数 如 下 。 
(1) Len(string): 返回 字符 串 string 中 的 字符 数目 。 
(2) Trim(string): 将 字符 串 string 前 后 的 空格 去 掉 。 
(3) Mid(string,start,length): 从 字符 串 string 的 start 字符 开始 取得 length 长 度 的 字符 
串 ， 如 果 省 略 第 三 个 参数 ， 则 表示 是 取 从 start 字符 开始 到 字符 串 结尾 的 字符 串 。 
(4) Left(string,length): 从 字符 串 string 的 左边 取得 length 长 度 的 字符 串 。 
(5) Right(string,length): 从 字符 串 string 的 右边 取得 length 长 度 的 字符 串 。 
(6) LCase(string): 将 字符 串 string 中 的 所 有 大 写字 母 转化 为 小 写字 母 。 
(7) UCase(string): 将 字符 串 string 中 的 所 有 小 写字 母 转化 为 大 写字 母 。 
(8) StrComp(stringl,string2): 返回 stringl 字符 串 与 string2 字符 串 的 比较 结果 ， 如 果 
两 个 字符 串 相同 ， 则 返回 0。 若 stringl 大 于 string2， 则 返回 正 数 ， 否 则 返回 负数 。 
(9) replace(string,old,new): 将 字符 串 string 中 的 所 有 old 子 串 用 new 串 替 换 。 
(10) instr(string,substD): 查找 字符 串 string 中 substr 子 串 首次 出 现 的 位 置 。 如 果 没 有 
substr 子 串 ， 则 返回 0。 
(11) instr(pos,string,substD: 从 字符 串 string 中 的 pos 位 置 开 始 往 后 查找 substr 子 串 首 
次 出 现 的 位 置 。 
(12) split(string,substr): 该 函数 返回 一 个 字符 串 数组 ， 数 组 元 素 是 使 用 substr 子 串 作 
为 分 隔 符 对 string 串 中 的 内 容 进行 切 分 后 得 到 的 所 有 子 串 。 
例如 ，split("1-0-0,2-0-0,4-0-0",",") 得 到 的 数组 包括 3 个 元 素 ， 它 们 的 值 分 别 为 "1-0-0"、 
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"2-0-0" 和 "4-0-0"。 
【思考 】 用 “-” 切 分 得 到 的 结果 又 如 何 ? 
【 例 3-5】 对 显示 文本 进行 变换 处 理 的 自 定义 函数 


<% 
Function convert(mytext) 
mytext = replace(mytext, ™™, ” ") "将 英文 单 引号 用 中 文 单 引号 替换 
mytext = replace(mytext, chr(13) & chr(10), "<br>") 
mytext = replace(mytext, chr(10), "<br>") 
mytext = replace(mytext, chr(13), "<br>") 
mytext = replace(mytext, chr (32),"&nbsp;") 
convert = mytext 
End Function 
%> 


【说 明 】 这 里 用 replace 方法 对 文本 中 的 单 引 号 、 回 车 /换行 符 及 空格 进行 替换 处 理 ， 
从 而 使 得 在 浏览 器 显示 内 容 时 能 保持 文本 的 原来 风格 。 防止 拼接 SQL 查询 语句 时 因为 英文 
单 引号 的 出 现 导 致 语句 格式 错误 。 


3.5.3 ”日 期 和 时 间 函 数 


在 VBScript 中 ， 可 以 使 用 日 期 和 时 间 函 数 来 得 到 各 种 样式 的 日 期 和 时 间 。 常 用 的 日 期 
和 时 间 函 数 如 下 。 

(1) Now0: 返回 系统 当前 的 日 期 和 时 间 。 

(2) Date0: 返回 系统 当前 日 期 。 

(3) Time0: 返回 系统 当前 时 间 。 

(4) Year(Date): 返回 给 定 日 期 的 年 份 。 

(5) Month(Date): 返回 给 定 日 期 的 月 份 。 

(6) Day(Date): 求 给 定 日 期 是 几 号 。 

(7) Hour(time): 求 给 定时 间 的 小 时 值 。 

(8) Minute(time): 求 给 定时 间 的 分 钟 值 。 

(9) Second(time): 求 给 定时 间 的 秒 值 。 

(10) WeekDay(Date): 返回 日 期 是 星期 几 的 整数 ，1 表示 星期 日 ，2 表示 星期 一 ， 依 

(11) DateDiff"Var" Varl,Var2): 计算 两 个 日 期 或 时 间 的 间隔 ， 其 中 ，Var 表示 间隔 
因子 ，Varl 表示 第 一 个 日 期 或 时 间 ，Var2 表示 第 二 个 日 期 或 时 间 。 

(12) DateAdd("Var",Varl,Var2): 对 两 个 日 期 或 时 间作 加 法 。 


心 


3.5.4 数学 函数 


VBScript 中 常用 的 数学 函数 如 下 。 
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(1) Abs(number): 返回 一 个 数 的 绝对 值 。 

(2) Sqr(number): 返回 一 个 数 的 平方 根 。 

(3) Sinmumber): 返回 角度 的 正弦 值 。 

(4) Cos(number): 返回 角度 的 余弦 值 。 

(5) Tan(umbenD: 返回 角度 的 正切 值 。 

(6) Log(number): 返回 一 个 数 的 对 数值 。 

(7) IntnoumbenD: 取 整 函数 ， 返 回 小 于 等 于 number 的 第 一 个 整数 。 

(8) Rndmumber): 产生 0 一 1 之 间 的 随机 数 。 

(9) Ubound( 数 组 名 称 , 维 数 ): 返回 该 数组 的 最 大 下 标 数 。 如 果 数 组 只 有 一 维 ， 则 可 
以 省 略 第 二 个 参数 维 数 。 

【说 明 】 用 Rnd 函数 产生 随机 数 时 ， 一 般 要 先 用 Randomize 对 序列 初始 化 ， 和 否则 每 次 
运行 程序 产生 的 随机 序列 都 是 一 个 不 变 的 序列 。 
【 例 3-6】 ”产生 一 个 在 一 定 范围 《0~-range) 内 不 含 重复 数 的 随机 序列 

以 下 函数 包含 两 个 参数 : range 为 抽 数 的 最 大 值 ，total 为 要 产生 的 随机 数 的 个 数 。 程 序 
中 将 抽 到 的 数 存 入 一 个 数组 〈shiti) 中 和 一 个 字符 串 〈havepick) 中。 为 方便 查找 处 理 ， 处 
理 过 程 中 将 已 抽 数 登记 在 字符 串 numstr 中 ， 其 中 的 每 个 数 添加 了 前 级 “-” 和 后 级 “,”。 


<% 
Function genrandom(total, range) 
reDim shiti(total) 
Randomize ' 对 随机 序列 初始 化 
havepick="" ' 存 放 抽 到 的 数 
pickamount=0 "已 抽取 数 的 个 数 
do while pickamount < total 
num = int(Rnd(1)* range )+1 
numstr = "-"&num&"” 
if instr(havepick,numstr) = 0 then 
shiti(pickamount) = num ' 不 能 存放 字符 串 ， 否 则 排序 不 正确 
havepick = havepick & numstr 登记 已 抽取 的 数 
pickamount = pickamount +1 
endif 
loop 
"以 下 将 序列 中 的 数据 按 由 小 到 大 排序 
For ai = 0 To pickamount-1 
For aj = ai + 1 To pickamount-1 
If shiti(ai)> shiti(aj) Then 
temp = shiti(ai) 
shiti(ai) = shiti(aj) 
shiti(a) = temp 
End If 
Next 
Next 
以 下 将 数值 数据 拼接 为 字符 串 ， 各 数 之 间 用 过 号 隔 开 
havepick= shiti(0) 
Forai=1To pickamount-1 


Ye 
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havepick = havepick &"," & shiti(ai) 
next 
genrandom = havepick 
end function 
%> 


【应 用 思考 】 该 函数 可 用 于 考试 系统 中 的 随机 抽 题 , 序列 的 数值 代表 记录 集 的 记录 号 。 
3.5.5 ”检验 函数 


检验 函数 通常 用 来 检验 某 变 量 是 否 是 某 种 类 型 ， 常 用 的 检验 函数 如 下 。 

(1) VarType(VarianD: 函数 值 为 该 变量 的 数据 类 型 ，0 表示 空 (Empty) ，2 表示 整 
数 ，7 表示 日 期 ，8 表示 字符 串 ，11 表示 布尔 变量 ，8129 表示 数组 。 

(2) IsNumeric(Variant): 如 果 Variant 是 数字 类 型 ， 则 函数 值 为 True。 

(3) IsDate(Variant): 如 果 Variant 是 日 期 类 型 ， 则 函数 值 为 True。 

(4) IsNull(Variant): 如 果 Variant 是 无 效 值 ， 则 函数 值 为 True。 

(5) IsEmpty(Variant): 如 果 Variant 没有 设 定 值 ， 则 函数 值 为 True。 

(6) IsObject(Variant): 如 果 Variant 是 对 象 类 型 ， 则 函数 值 为 True。 

(7) IsArray(Variant): 如 果 Variant 是 数组 类 型 ， 则 函数 值 为 True。 


3.5.6 输入 与 输出 函数 


1. 输入 函数 InputBox 
InputBox 函数 的 作用 是 显示 一 个 输入 对 话 框 ， 用 于 用 户 输 入 信息 。 其 语法 格式 如 下 : 
InputBox(prompt [,title][,default]) 
【注意 】“[” 和 “]” 中 的 内 容 表 示 可 选项 。 
其 中 : 
(1) prompt: 显示 在 对 话 框 中 的 文字 。 
(2) title: 显示 在 对 话 框 标题 中 的 文字 。 
(3) default: 指定 对 话 框 中 输入 框 内 的 默认 值 。 
函数 返回 值 为 用 户 从 键盘 输入 的 字符 串 内 容 。 
2. 输出 函数 MsgBox 
MsgBox 函数 的 作用 是 弹出 一 个 消息 框 ， 用 于 告知 用 户 信息 。 其 语法 格式 如 下 : 
MsgBox(prompt [,button][,title]) 
其 中 : 
(1) prompt: 显示 在 消息 框 中 的 文字 。 
(2) button: 是 一 个 数值 表达 式 ， 用 于 指定 显示 按钮 的 数目 及 形式 ， 使 用 图 标 样式 等 。 
Button 参数 的 常用 设置 值 如 表 3-6 所 示 。 具 体 值 可 以 是 几 类 常量 的 相 加 组 合 。 
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(3) title: 显示 在 消息 框 标题 中 的 文字 。 
表 3-6 button 参数 的 常用 设置 值 


常 量 值 含义 
vbOKOnly 0 只 显示 OK 按钮 
vbOKCanel 1 只 显示 OK 及 Canel 按钮 
VbAbortRetryIgnore 2 只 显示 Abort、Retry 及 Ignore 按钮 
vbYesNoCanel 上 只 显示 Yes、No 及 Canel 按钮 
vbYesNo 4 只 显示 Yes 及 No 按钮 
vbRetryCanel 5 只 显示 Retry 及 Canel 按钮 
vbCritical 16 显示 重要 消息 图 标 
vbQuestion 32 显示 询问 图 标 
vbExclamation 48 s 消 
vbInformation 64 
vbDefaultButtonl 0 第 1 个 按钮 是 默认 值 
vbDefaultButton2 256 第 2 个 按钮 是 默认 值 
vbDefaultButton3 S12 第 3 个 按钮 是 默认 值 
vbDefaultButton4 768 第 4 个 按钮 是 默认 值 


【 例 3-7】 判断 一 个 输入 数 是 否 为 素数 ， 若 是 ， 则 输出 yes， 否 则 输出 no 


< ---eX3-7.htm-- 一 -一 -一 
<script type="text/vbscript"> 
n = cint(InputBox(" 请 输入 一 个 整数 ")) 
k=2 
do while k<n 
if n mod k=0 then exit do 
k=k+1 
loop 
if k<n then 
MsgBox " no 
else 
MsgBox "yes " 
End if 
</script> 


【说 明 】 这 里 使 用 了 InputBox 函数 读 取 用 户 从 键盘 输入 的 数据 ， 并 用 cint 函数 将 数据 
转换 为 整数 。 注 意 ， 根 据 素数 的 定义 条 件 组 织 循环 ， 在 循环 中 只 要 有 一 个 数 能 除 尽 x 就 可 
以 判断 不 是 素数 ， 利 用 exit do 退出 循环 。 

【注意 】 输 入 与 输出 函数 只 能 在 客户 端 运 行 ， 能 在 服务 器 端 运行 。 


VBScript 是 ASP 脚本 编程 的 默认 语言 ， 它 既 可 用 于 服务 器 端的 ASP 脚本 编程 ， 又 可 
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用 于 客户 端的 事件 驱动 编程 。 由 于 除了 正 浏览 器 外 ， 其 他 浏览 器 不 支持 VBScript， 因 此 ， 
在 实际 应 用 中 它 主 要 用 于 服务 器 端的 ASP 编程 .本 章 介 绍 VBScript 的 数据 类 型 和 语言 基本 
组 成 。 读 者 在 熟悉 语言 的 基本 语句 和 常用 函数 使 用 的 基础 上 ， 注 意 把 握 VBScript 的 数据 类 
型 的 特点 ， 熟 悉数 组 的 定义 和 使 用 ， 掌 握 过 程 与 函数 的 定义 与 调用 方法 。 另 外 ，VBScript 
还 有 一 个 复杂 的 内 容 就 是 客户 端的 事件 处 理 编程 ， 本 书 中 不 进行 介绍 ， 客 户 端 编程 建议 用 
户 尽 量 使 用 JavaScript， 因 为 所 有 浏览 器 均 支 持 JavaScript 代码 。 


习 是 


1. 选择 题 
(1) 以 下 说 法 正确 的 是 〈 站 
A. VBScript 的 注释 符号 为 “//” 
B. 常量 是 一 种 不 会 改变 的 数 ， 定 义 常量 要 使 用 “Dim 常量 名 称 ” 
C. 运算 符 “+” 也 可 以 用 来 连接 字符 串 
D. 运算 符 Mod 可 以 计算 出 除法 结果 中 的 整数 
(2) 关于 VBScript 的 命名 规则 ， 下 面 说 法 中 不 正确 的 是 〈 站 < 
A. 第 一 个 字符 必须 是 数字 或 字母 
B. 长 度 不 能 超过 255 个 字符 
C. 名 字 不 能 和 关键 字 同 名 
D. 在 声明 时 不 能 声明 两 次 


(3) 使 用 〈 ) 语句 可 以 立即 从 Sub 过 程 中 退出 。 
A. Exit Sub B. Exit 
C. </Sub> D. Loop 
(4) 判断 程序 运行 完毕 后 ，x、y、z 的 值 分 别 为 ( > 
x="11"+1 
y="l1"&1 
z="11"4 "1 
A. 111,111,111 Bi 这: 巡 名 这 
© Will D122 
(5) 下 列 ( ) 函数 可 以 将 数值 型 转换 为 字符 串 。 
A. CDate B. CInt x D. CDbl 
(6) 函数 mid("1234567890", 3, 3) 的 返回 值 是 ( 页 二 
A. 345 B. 234 C. 456 D. 7890 
(7) 在 VBScript 中， 注释 采用 ( ) 。 
A. / B. /*ee#/ 有 


(8) 若 要 求 VBScript 的 变量 在 使 用 前 必须 事先 定义 ， 则 应 使 用 ) 语句 来 设置 。 
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A. Option Explicit B. Option Base 

C. Dim D. ReDim 
(9) 函数 Instr("xxPPppXXpx","pp") 的 返回 值 为 《 Wy 

A. 3 BB i D. 4 
(10) 退出 Do 循环 ， 应 使 用 的 语句 是 ( 六 

A. Exit B. ExitSub C. ExitFor D. ExitDo 
2. 问答 题 


(1) 写 出 下 面 儿 个 表达 式 的 运算 结果 。 
@ 19 Mod5*3 © -3^2 "3.1415"&926  @ 234&0.12345 
© "50" + "50" © "x">"y" (@) (9>3)Xor "x">"y") 
(2) VBScript 中 变量 的 数据 类 型 是 什么 ? 有 什么 特点 ? 
(3) VBScript 中 的 变量 和 数组 在 功能 上 有 何 异 同 ? 
3， 编程 题 
(1) 试 编写 程序 段 ， 将 字符 串 “ 美 丽 ” 和 “中 华 ” 两 边 的 空格 去 掉 ， 并 连 成 一 个 字符 
串 “美丽 中 华 ”。 
(2) 编写 函数 fx,y) 计 算 x 和 y 的 平方 和 ， 并 调用 该 函数 求 2 和 6 的 平方 和 。 
(3) S=12+3?+5?+…+199"， 试 利用 两 种 循环 语句 编写 程序 计算 S 的 值 。 
(4) 设 有 一 个 字符 串 表 示 一 个 知识 点 集合 ， 前 后 为 小 括号 ， 知 识 点 之 间 用 逗号 分 割 ， 
统计 其 中 知识 点 的 数量 ， 分 离 出 该 字符 串 中 的 每 个 知识 点 ， 如 (1-0-0,2-1-0,4-0-0)。 
(5) 编写 一 个 程序 ， 在 客户 端 弹出 对 话 框 让 用 户 输入 一 个 整数 n， 计 算 n 的 阶乘 ， 并 
将 结果 通过 提示 框 显示 。 
(6) 编写 一 个 程序 ， 在 服务 器 端 利用 随机 函数 产生 一 个 小 于 10 的 整数 n， 计 算 n 的 
阶乘 ， 并 在 网 页 中 显示 n!=xxx 的 输出 。 
(7) 编程 实现 在 页 面 中 输出 100 个 随机 键 位 的 大 写字 母 ， 要 求 每 行 显示 20 个 字母 ， 
各 字母 间 用 一 个 空格 分 割 。 
方法 1: 定义 100 个 数组 元 素 的 数组 ， 用 来 存放 产生 的 随机 字母 。 参 考 代码 如 下 : 
<% 
dim ran(100) 
randomize 
fori=1 to 100 
ran(i) = chr(int(26*rnd())+65) 
next 
for i=1 to 100 
Response.Write(ran(i) & "&nbsp;&nbsp; ") 
ifimod 20=0 then 
Response.Write("<br>") 
end if 


next 
%> 
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方法 2: 定义 用 于 存放 26 个 随机 字母 的 数组 ， 通 过 产生 100 个 随机 获取 数组 元 素 的 下 

标 地 址 来 获得 这 些 字母 。 
(8) 编写 求 阶乘 的 函数 ， 并 利用 该 函数 实现 求 组 合 的 函数 。 

n 个 元 素 中 取 m 个 元 素 的 组 合 为 C(n,m)=nl/((n-m)!*ml)。 

利用 求 组 合 方法 输出 如 下 杨辉 三 角形 。 

c(0,0) 

c(1,0) c(1,1) 

c(2.0) c(2,1) c(2,2) 

cG.0) c(3.D cG3.2) c(3.3) 

要 求 分 别 在 客户 端 代 码 和 服务 器 端 代码 中 实现 输出 。 
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ASP 提供 了 6 个 内 置 对 象 ， 这 些 对 象 在 使 用 时 不 需要 任何 声明 和 建立 的 过 程 ， 可 在 代 

码 中 直接 调用 它们 ， 其 功能 如 表 4-1 所 示 。 
表 4-1 ASP 的 内 置 对 象 及 功能 
对 象 名 称 功 能 

用 于 获取 HTTP 请 求 传递 的 所 有 信息 ， 包 括 从 HTML 表单 用 POST 或 GET 
方法 传递 的 信息 、Cookie 等 

Response 对 象 用 于 发 给 客户 端 、 重 定向 浏览 器 到 另 一 个 URL 和 设置 Cookie 的 值 等 
提供 了 一 系列 的 方法 和 属性 ， 为 应 用 程序 提供 特定 服务 ， 最 常用 的 是 Server. 


Request 对 和 象 


.证 研 
DS CreateObject 方法 ， 它 允许 在 服务 器 上 创建 对 象 

0 用 于 存储 用 户 的 个 性 化 信息 ， 其 保存 的 用 户 状态 信息 在 Session 过 期 或 删除 
Session 对 象 前 一 直 有 效 
Application 对 象 和 获取 可 以 被 该 应 用 程序 所 有 用 户 共享 的 信息 


-提交 或 中 止 一 个 由 Microsoft 事务 服务 器 (MTS ) 管理 的 事务 , 通过 ASP 
脚本 对 事务 服务 进行 初始 化 


ObjectContext 对 象 


在 这 些 对 象 中 ， 最 常用 的 是 Request 对象 和 Response 对 象 ， 它 们 实现 了 客户 浏览 器 与 
Web 服务 器 的 交互 功能 。Request 对 象 对 应 HTTP 请 求 ， 而 Response 对 象 对 应 HTTP 响应 。 


4.1 Request 对 象 


Request 对 象 用 于 访问 客户 端 用 HTTP 请 求 传递 的 信息 , 将 客户 端 数据 保存 到 内 置 的 几 
个 集合 中 ， 如 表 4-2 所 示 。 通 过 访问 这 些 集合 ， 可 分 别 获得 表单 所 提交 的 数据 、Cookie 的 
值 以 及 服务 器 环境 的 值 等 。Request 对 象 只 有 一 个 属性 TotalBytes， 其 功能 是 取得 客户 端 请 
求 数据 的 字 节 大 小 。 同 时 Request 对 象 只 有 一 个 方法 BinaryRead， 其 功能 是 读 取 通 过 POST 
请 求 从 客户 端 传送 到 服务 器 的 二 进 制 数据 。 
表 4-2 Request 对 象 的 集合 


集合 名 称 功能 与 用 途 
Form 获得 用 POST 方法 提交 的 表单 数据 
QueryString 获得 用 GET 方法 提交 的 表单 数据 
Cookies 获得 Cookie 的 值 
ServerVariables 获得 HTTP 头 文件 的 相关 信息 和 服务 器 环境 变量 的 值 


ClientCertificate 获得 HTTP 请 求 的 客户 端 证 书 中 的 字段 值 
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Request 对 象 集合 的 数据 访问 方式 如 下 : 

Request. 集 合 名 (参数 ) 

其 中 ， 参 数 可 以 是 字符 串 形式 表示 的 一 个 元 素 名 或 数值 形式 表示 的 元 素 序号 。 

【注意 也 可 以 省 略 集合 名 , 而 直接 通过 Request( 参 数 ) 访 问 数据 集合 的 成 员 , 这 时 ASP 
会 按照 QueryString、Form、Cookies、ClientCertificate、ServerVariables 的 顺序 在 各 个 数据 
集合 中 搜索 该 变量 ， 并 返回 第 一 个 出 现 的 变量 值 。 显 然 ， 如 果 不 指定 数据 集合 ， 则 一 方面 
会 影响 执行 效率 ， 另 一 方面 还 可 能 由 于 多 个 集合 中 有 同名 元 素 而 出 现 访问 歧义 性 。 


4.1.1 Form 集合 


1. 基本 使 用 方式 


Form 集合 是 使 用 POST 方法 提交 的 表单 数据 。 其 语法 格式 如 下 : 
RequestForm( 参 数 )[( 索 引 )| .Count] 
其 中 : 
口 参数 ， 用 来 指定 表单 元 素 名 或 元 素 序 号 。 集 合 中 元 素 序号 是 从 0 开始 的 。 
口 索引 : 为 可 选项 ， 使 用 该 选项 可 以 访问 某 参数 中 多 个 值 中 的 一 个 。 它 可 以 是 1 到 
Requset. Ponn( 参 数 ) Count 之 间 的 任意 整数 。 
口 Count: 表示 集合 中 具有 相同 参数 名 的 元 素 的 个 数 。 
以 下 为 表单 访问 的 常用 形式 举例 。 
(1) Request.Form("usemame"): 访问 表单 中 名 为 usemame 的 域 。 
(2) Request.Form("hobby").count: 假设 hobby 为 一 个 多 值 元素 ， 则 该 式 求 元 素 的 个 数 ， 
而 Request.Form("hobby") 的 结果 是 一 个 集合 。 
(3) Request.Form("hobby")(i):; 求 hobby 的 序号 为 i 的 值 ，i 从 0 开始。 
(4) Request.Form.count: 表单 中 的 元 素 个 数 。 
(5) Request.Form(i): 访问 表单 中 序号 为 i 的 域 ,i 从 0 开始 。 
【 例 4-1】 简单 注册 提交 程序 
以 下 注册 程序 将 用 户 填 写 的 注册 信息 通过 注册 处 理 程序 获取 后 显示 在 页 面 中 。 
程序 1: 注册 界面 
< ----------regist.html-———-— 2 
<html> 
<body> 
<center> 用 户 注册 
<form action="regist_process.asp" method="post" name="myform"> 
<table border="0" bordercolor="#FF0000" width=50%> 
<tr><td width="40%" > 用 户 名 : </td> 
<td width="60%" ><input name="username" type="text"></td></tr> 
<tr><td> 密 码 : </td><td><input name="userkey" type="password" ></td></tr> 
<tr><td> 性 别 : </td><td > 
<input name="sex" type="radio" value=" 男 " checked> 男 


“56。 Web 编程 实践 教程 


<input type="radio" name="sex" value=" 女 "> 女 
</td></tr> 

<tr><td > 教育 水 平 : </td><td> 

<select name="edu" size="1" id="edu"> 

<option value=" 硕 士 以 上 "> 硕士 以 上 </option> 

<option value=" 大 学 本 科 "> 大 学 本 科 </option> 

<option value=" 大 专 "> 大 专 </option> 

<option value=" 中 专 以 下 "> 中 专 以 下 </option> 

</select> 

</td></tr> 

<tr><td > 电子 邮箱 : </td><td ><input name="email" type="text" ></td> 
</tr><tr><td>&nbsp;</td><td>&nbsp;</td></tr> 

<tr><td colspan="2" > 

<div align="center > 

<input type="submit" name="register" value=" 注册 "> 
<input type="reset" name="input_again" value=" 全 部 重 写 "> 
</div> 

</td></tr> 

</table> 

</form> 

</center> 

</body> 

</html> 


运行 结果 如 图 4-1 所 示 。 


Er 
地 it) | 国 htpbaohoahoxregzthtnl 


用 户 名 ， 
密码 ， 


包子 闻 箱 ， antzaaecina cos 


注册 全 部 重 写 


图 4-1 用 户 注册 
程序 2: 注册 处 理 


En ee Tegist_process.asp 一 -i 
<html> 

<body> 

注册 的 用 户 名 为 : <%=request.form("username")%><br> 

输入 密码 为 : <%=request.form("userkey")%><br> 

性 别 为 :<%=request.form("sex")%><br> 

教育 程度 为 : <%=request.form("edu")%><br> 

电子 邮箱 为 : <%=request.form("email")%> 
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</body> 
</html> 


运行 结果 如 图 4-2 所 示 。 

【说 明 】 注 意 两 个 程序 之 间 的 关系 ，regist.html 用 于 实现 注册 信息 的 填写 界面 ， 其 中 包 
含有 一 个 表单 ， 表 单 的 action 属性 规定 了 表单 提交 后 将 传 给 regist_process.asp 程序 进行 处 
理 。 在 regist_process.asp 程序 中 可 通过 request 对 象 读 取 表 单 控件 提交 的 数据 。 

2. 遍历 表单 元 素 
如 果 要 遍历 输出 表单 提交 的 所 有 数据 ， 可 以 利用 for 循环 实现 。 

方法 1: 利用 元 素 与 集合 的 从 属 关 系 通 过 for each 循环 访问 集合 元 素 。 
<% 


for each item in request.form 
response.write "<br>"&item&":"&request.form(item) 


next 

%> 

方法 2: 利用 序号 访问 集合 元 素 。 
<% 


for i=1 to request.form.count 
response.write(request.form(i)&"<br>") 

next 

%> 


【 例 4-2】 ”获取 多 项 选择 题 的 用 户 解 答 

以 下 为 网 络 教 学 中 演示 多 选 题 做 题 界面 的 应 用 。 在 输入 表单 中 ， 利 用 循环 产生 5 个 名 
字 均 为 choicel 的 复 选 框 ， 它 们 的 值 分 别 为 A、B、C、D、E。 

文件 1: 试题 及 解答 表单 显示 页 面 (dxztasp) 


< 试题 内 容 显 示 部 分 涉及 访问 数据 库 ， 略 --> 

<form name="my" METHOD="post" ACTION="process.asp" > 
<table width=80%> 

<% 

str="ABCDE" 

fork=1to5 

%> 

<td align=left> 

<input type="checkbox" name="choice1” value="<%=mid(str,k,1)%>" ><%= mid(str,k,1)%> 
</td> 

<% next %> 

</table> 

<P align=center><input type="submit" value=” 提交 "></p> 
</form> 


运行 结果 如 图 4-3 所 示 。 
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3 http:/localhost/test/regist_process.asp - Microsoft... (=| 回 又 台 http:/Mlocalhosthest/dxzt.asp - Microsof... 同 同 又 
Er 加 EEC 
地 iD 者 http:tfbcahosthestregst_process asp > bc Md g A | 品 

所 :日 - 国 国 骨 呈 控 


Eytan 和 说 让 D) 狠 htp:jfocahosttedjdat.asp 他 | 天竺 到 这 计 ” 


性 别 为 ， 男 
教育 程度 为 ， 大 学 本 科 
电子 邮箱 为 ，zhangsarlgeina. ccm 


图 4-2 显示 用 户 填写 的 信息 图 4-3 ”多 选 题解 答 界面 
文件 2: 判定 解答 处 理 程序 
在 网 络 教 学 系统 中 ， 该 程序 实际 上 是 将 用 户 的 解答 与 数据 库 中 的 标准 答案 进行 比较 ， 
根据 比较 结果 给 出 不 同 的 响应 信息 。 这 里 不 妨 仅 将 用 户 提交 的 解答 输出 。 


-一 一 -一 一 一 一 process.asp 一 一 一 一 一 一 一 一 一 一 一 一 一 
<html> 

<body> 

-- 一 -你 选择 的 答案 是 : <%= request.Form("choice1") %> 

</body> 

</html> 


对 应 图 4-3 中 显示 的 用 户 操作 ， 解 答 处 理 程序 的 输出 结果 为 : 

----- 你 选择 的 答案 是 : B，D 

可 以 看 出 ， 结 果 为 一 个 数据 集合 ， 只 有 被 选中 的 选项 才 会 出 现在 多 值 集合 中 。 要 裔 历 
集合 中 的 所 有 元 素 ， 可 通过 for 循环 实现 。 以 下 为 ASP 程序 代码 : 


answer=' 

Response.Write "----- 你 选择 的 答案 是 :“" 

for n=1 to request.Form("choice1").count 
answer=answer & request.Form("choice1")(n-1) 

next 

Response.Write(answer) 


如 此 以 来 ， 显 示 的 输出 结果 为 : 

----- 你 选择 的 答案 是 : BD 

如 果 用 for each 循环 访问 以 上 集合 元 素 ， 可 写成 如 下 形式 : 
for each item in request.Form("choice1") 


answer=answer & item 
next 


4.1.2 QueryString 集合 


QueryString 集合 用 于 检索 HTTP 查询 字符 串 中 变量 的 值 , HTTP 查询 字符 串 由 URL 中 
问号 (?) 后 的 内 容 指定 。 例 如 : 
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<A HREF= "example.asp?info=this is a sample">string sample</A> 


表示 该 超 链接 的 URL 中 有 一 个 参数 名 为 info, 值 为 "this is a sample"。 如 果 有 多 个 参数 ， 
则 参数 间 用 “&” 分 隔 。 

利用 QueryString 集合 获取 客户 端 数 据 的 语法 格式 如 下 : 

Request.QueryString(variable)[(index)|.Count] 

例如 : 


request.querystring("info") 
一 般 地 ，QueryString 集合 用 于 获取 超 链 接 传递 的 信息 ， 例 如 : 


<html> 

<body> 

<p> 选 择 课程 : <br> 

<a href="enterkc.asp?kc=java">Java 语言 </a><p> 

<a href="enterkc.asp?kc=web">Web 编程 技术 </a><p> 

</body> 

</html> 

【说 明 】 页 面 中 有 多 个 目标 为 enterkc.asp 的 超 链 接 ， 每 个 超 链接 含有 名 为 kc 的 URL 

参数 。 当 用 户 单 击 超 链 接 时 ， 在 enterkc.asp 程序 中 可 以 通过 如 下 形式 知道 用 户 选 择 了 哪 门 
课程 。 

Request.QueryString("kc") 


【应 用 举例 】 在 网 上 教学 系统 的 首页 可 通过 这 样 的 形式 让 用 户 选 择 进入 学 习 的 课程 。 

如 果 表 单 提交 方式 使 用 的 是 get 形式 ， 则 其 数据 域 将 附加 在 处 理 程序 的 URL 地 址 后 
面 ， 如 http://localhost/login.asp? username=guest&password=123456。 

这 样 就 类 似 于 超 链接 的 访问 形式 。 如 果 是 单 帧 的 页 面 ， 则 在 地 址 栏 中 将 显示 一 个 长 串 
的 URL， 表 单 输入 均 暴 露 在 URL 参数 中 ， 包 括 输入 的 密码 也 是 明文 显示 ， 这 就 显得 有 些 
不 合适 。 另 外， get 方法 对 传输 的 数据 量 受到 下 地址 栏 长 度 的 限制 的 影响 , 不 允许 超过 2K。 
因此 ， 表 单 提交 一 般 采 用 post 方式 。 


4.1.3 ”Cookies 集合 


通过 表单 和 URL 查询 参数 时 只 能 在 相 邻 的 页 面 间 传 递 数据 信息 , 在 实际 应 用 系统 中 经 
常 需要 持久 保持 客户 的 状态 信息 。 例 如 ， 客 户 登录 后 的 身份 在 应 用 系统 中 只 要 登录 一 次 ， 
则 在 后 续 页 面 中 将 始终 知道 用 户 的 身份 。 由 于 HTTP 协议 的 无 状态 性 ， 浏 览 器 与 服务 器 的 
连接 只 维持 在 一 次 请 求 响应 动作 过 程 中 ， 必 须 设法 在 客户 端 记 住 客户 与 网 站 的 关联 信息 。 
Cookie 即 是 存储 在 客户 端 硬盘 上 的 一 种 变量 ， 常 用 于 保存 用 户 的 状态 信息 。Cookie 保存 的 
数据 信息 将 随 每 次 HTTP 请 求 传递 给 服务 器 。Request 对 象 的 Cookies 集合 用 于 检索 用 户 在 
HITP 请 求 中 发 送 的 Cookie 值 。 
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需要 注意 的 是 ， 出 于 安全 方面 的 考虑 ， 有 的 客户 可 能 会 禁用 自己 计算 机 上 浏览 器 的 
Cookie， 这 时 就 不 能 正常 运行 含有 Cookie 访问 的 应 用 。 

读 取 Cookies 集合 的 语法 格式 如 下 : 

Request.Cookies("Cookiename")[(Key)l.attribute] 

其 中 : 

口 “Cookiename 为 Cookie 变量 的 名 称 ， 用 于 指定 要 检索 其 值 的 Cookie。 
口 Key 代表 子 关键 字 的 名 字 ， 当 Cookie 含有 子 关 键 字 时 ， 用 于 检索 子 关 键 字 的 值 。 
口 attribute 为 Cookie 的 属性 ,用 于 指定 Cookie 自身 的 有 关 信 息 ， 如 HasKeys 属性 用 

来 检查 Cookie 是 否 包 含有 子 关键 字 。 

和 前 面 集 合 的 访问 类 似 ， 对 集合 元 素 的 访问 可 以 通过 元 素 名 称 ， 也 可 以 通过 元 素 序 号 ， 
建议 通过 元 素 名 称 访 问 ， 这 样 更 清楚 ， 也 不 容易 引起 误会 。 如 果 一 个 Cookie 包含 有 子 关 键 
字 ， 则 访问 Cookie 元 素 通常 要 指定 子 关键 字 。 如 果 访 问 Cookie 时 未 指定 子 关键 字 ， 则 所 
有 关键 字 的 内 容 将 作为 一 个 查询 字符 串 返回 。 

例如 ， 如 果 MyCookie 有 First 和 Second 两 个 关键 字 ， 则 当 获 取 Cookie 值 时 ， 如 果 不 
指定 关键 字 ， 代 码 如 下 : 


<%= Request.Cookies("MyCookie")%> 


那么 将 输出 全 部 关键 字 的 信息 。 结 果 为 First=firstkeyvalue&Second=secondkeyvalue。 

如 果 指 定 了 关键 字 ， 则 可 得 到 相应 关键 字 的 信息 ， 例 如 : 

<%= Request.Cookies("MyCookie")("First")%> 

结果 为 关键 字 First 的 值 。 

要 确定 某 个 Cookie 是 否 有 子 关键 字 ， 可 使 用 HasKeys 属性 进行 检测 。 例 如 : 

<%= Request.Cookies("myCookie").HasKeys %> 

【应 用 举例 】 在 用 户 登录 页 面 处 理 程序 中 ， 如 果 检 查 用 户 合法 ， 则 将 用 户 标 识 通 过 如 

下 语句 存储 在 Cookie 变量 username 中 : 

response.cookies("username")=request.form("userid") 

在 后 续 页 面 中 ， 可 以 通过 读 取 Cookie 变量 usemame 的 值 获取 用 户 身份 ， 例 如 : 


User = request.cookies("username") 
4.1.4 ServerVariables 集合 


当 客 户 端 浏览 器 向 服务 器 发 送 页 面 请 求 时 , 除了 将 所 请 求 页 面 的 URL 地 址 传送 给 服务 
器 之 外 ， 也 将 浏览 器 的 类 型 、 版 本 等 信息 一 起 传送 给 服务 器 ， 这 些 信息 统称 为 请 求 标 头 。 
当 服务 器 响应 客户 端 浏 览 器 的 请 求 时 ， 除 了 将 所 请 求 的 文件 传递 给 客户 端 之 外 ， 也 将 该 文 
件 的 大 小 、 日 期 等 信息 一 起 传送 给 客户 端 ， 这 些 信 息 统 称 为 响应 标 头 。 请 求 标 头 和 响应 标 
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头 统称 为 HITP 标 头 。 使 用 Request 对 象 的 ServerVariables 集合 可 以 检索 预定 的 环境 变量 


和 HTTP 标 头 信息 ， 语 法 格式 如 下 : 
Request.ServerVariables(" 环 境 变 量 名 称 ") 
常用 的 服务 器 环境 变量 如 表 4-3 所 示 。 


表 4-3 常用 的 服务 器 环境 变量 


环境 变量 名 内 容 含 义 
ALL HTTP 客户 端 发 送 的 所 有 HTTP 标题 文件 
CONTENT LENGTH 客户 端 发 出 内 容 的 长 度 
CONTENT TYPE 内 容 的 数据 类 型 ， 如 text/html 
LOCAL ADDR 接受 请 求 的 服务 器 地 址 
LOGON USER 用 户 登 录 Windows NT 的 账号 

UERY STRING 站 HTTP 请 求 中 问号 〈?) 后 的 信息 
REMOTE ADDR. 发 出 请 求 的 客户 机 的 下 地址 
REMOTE HOST 发 出 请 求 的 客户 机 的 名 称 
REQUEST METHOD 用 于 构造 访问 请 求 的 HITP 方法 ， 如 GET、HEAD、POST 等 
SERVER_NAME 服 各 本 的 名 称 
SERVER_ PORT 发 送 请 
SCRIPT NAME 正在 执行 县 本文 什 的 虑 所 中 从 和 名 称 
PATH TRANSLATED 所 请 求 文件 的 物理 路 径 
PATH INFO URL 请 求 的 路 径 信息 
HTTP USER_AGENT 浏览 器 的 类 型 


以 下 程序 给 出 了 访问 CAI 服务 器 对 若干 环境 变量 的 测试 结果 : 


<% 

Response.Write Request.ServerVariables("LOCAL_ADDR")&"<br>" 
Response.Write Request.ServerVariables("REMOTE_ADDR")&"<br>" 
Response.Write Request.ServerVariables("PATH_INFO")&"<br>" 


Response.Write Request.ServerVariables("PATH_TRANSLATED")&"<br>" 


Response.Write Request.ServerVariables("SCRIPT_NAME") 

%> 

则 访问 http://caiecjtu.jx.cm/java/testV.asp 的 输出 结果 如 下 : 
172.16.16.166 

172.16.16.113 

/Java/testV.asp 

E:\caiyava\testV.asp 

/Java/testV.asp 

使 用 以 下 脚本 代码 可 输出 服务 器 全 部 环境 变量 。 


<TABLE> 
<TR><TD><B> 环 境 变量 </B></TD><TD><B> 值 </B></TD></TR> 


testV.asp——-———————————-———--—----- 
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<% For Each name In Request.ServerVariables %> 
<TR> 

<TD> <%= name %> </TD> 

<TD> <%= Request.ServerVariables(name) %></TD> 
</TR> 

<% Next %> 

</TABLE> 


4.2” ”Response 对象 


Response 对 象 与 一 个 HTTP 响应 相对 应 ， 它 主要 用 于 控制 发 送 给 用 户 的 信息 ， 包 括 发 
送 响 应 信息 给 浏览 器 、 重 定向 浏览 器 到 另 一 个 URL、 设 置 Cookie 的 值 等 。 
Response 对 象 的 语法 格式 如 下 : 
Response. 数 据 集合 | 属性 | 方法 
其 中 ， 数 据 集合 、 属 性 和 方法 这 3 个 参数 只 能 选择 一 个 。 


4.2.1 Response 对 象 的 属性 


1. Charset 属性 


Charset 属性 将 字符 集 名 称 附加 到 Response 对 象 中 content-type 标题 的 后 面 ， 用 来 设置 
Web 服务 器 发 送 给 客户 端 响应 内 容 的 字符 编码 。 例 如 : 


<% Response.Charset="gb2312" %> 


2. ContentType 属性 

ContentType 属性 用 于 指定 服务 器 响应 的 HTTP 内 容 类 型 。 如 果 未 指定 ContentType， 
则 默认 为 texVHTML。 如 果 发 送 为 普通 文本 ， 则 ContentType 属性 设置 为 text/plain; 如 果 发 
送 为 xml 文本 ， 则 ContentType 属性 设置 为 text/xml。 例 如 : 


<% Response.ContentType="text/xml" %> 


3. Buffer 属性 
如 果 Buffer 属性 为 True， 则 服务 器 发 送 的 响应 信息 写 入 缓冲 区 ， 只 有 当前 页 的 所 有 服 
务 器 脚本 处 理 完 毕 或 者 调用 了 Flush 或 End 方法 才 将 缓冲 区 内 容 发 送 给 客户 端 ;如 果 Buffer 
属性 为 False， 则 在 服务 器 处 理 脚 本 时 ， 顺 序 将 响应 信息 直接 发 送 给 客户 端 。 
【注意 】 
(1) 服务 器 将 输出 发 送 给 客户 端 浏览 器 后 ， 不 能 再 设置 Buffer 属性 ， 因 此 ， 通 常 在 
ASP 文件 的 第 一 行 设 置 Response.Buffer 的 值 。 
(2) 在 IIS5.0 以 后 版 中 ，Buffer 属性 默认 值 为 True， 而 在 以 前 版 中 ，Butffer 属性 默认 
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值 为 False， 或 者 用 户 也 可 以 在 IIS 控制 台 进行 设置 。 设 置 缓冲 的 目的 是 提高 应 用 的 整体 效 
率 ， 但 如 果 ASP 代码 执行 时 间 过 长 ， 客 户 未 接受 到 任何 信息 ， 可 能 会 使 用 户 失 去 耐心 。 

4. Expires 属性 
当 一 个 Web 页 被 传送 到 客户 端 浏览 器 后 , 下 会 将 其 内 容 保存 到 客户 端 计 算 机 上 , 其 目 
的 是 当 以 后 遇 到 访问 相同 的 Web 页 时 ,就 直接 从 浏览 器 的 缓冲 区 读 取 ， 这样 可 提高 访问 效 
率 。Expires 属性 指定 在 浏览 器 上 缓冲 存储 的 页 面 距离 过 期 还 有 多 少时 间 ， 以 分 钟 为 单位 。 
如 果 用 户 在 某 个 页 过 期 之 前 又 回 到 此 页 ， 就 会 显示 缓冲 区 中 的 页 面 。 

由 于 ASP 应 用 的 数据 内 容 是 动态 变化 的 ， 所 以 使 用 过 期 页 面 得 到 的 数据 可 能 不 真实 。 
因此 ， 若 经 常设 置 response.expires=0， 则 可 使 缓存 的 页 面 立 即 过 期 。 

【 注意】 该 属性 的 设置 必须 放 在 HTML 标记 前 ， 和 否则 会 出 错 。 如 果 该 属性 在 页 中 被 多 
次 设置 ， 则 使 用 最 短 的 时 间 值 。 

5S. ExpiresAbsolute 属性 


ExpiresAbsolute 属性 指定 页 面 在 浏览 器 缓存 中 的 确切 到 期 日 期 和 时 间 。 在 未 到 期 之 前 ， 
若 用 户 返 回 到 该 页 ， 则 应 从 缓存 中 提取 页 面 显示 。 其 语法 格式 如 下 : 
Response.ExpiresAbsolute [= [date] [time]] 
其 中 ，date 参数 指定 页 面 的 到 期 日 期 ， time 参数 指定 页 的 到 期 时 间 。 如 果 未 指定 时 间 ， 
则 该 Pe F 夜 到 期 。 如 果 未 指定 日 期 , 则 该 页 面 在 脚本 运行 当天 的 指定 时 间 到 期 。 
注意 】 若 ExpiresAbsolute 属性 在 页 中 被 多 次 设置 ， 则 以 最 早 到 期 的 日 期 和 时 间 为 准 。 


4.2.2 ”Response 对 象 的 方法 


1，Write 方法 


Write 方法 是 Response 对 象 最 常用 的 方法 ， 用 于 向 浏览 器 输出 HIML 信息 。 其 语法 格 
式 如 下 : 

Response.Write Variant 

其 中 ，Variant 可 以 是 VBScript 支持 的 任何 类 型 的 数据 ， 通 常 为 一 个 字符 串 , 或 是 用 连 
接 符 “&” 连 接 在 一 起 的 字符 串 。 
【 例 4-3】 Write 方法 的 使 用 


-CX4-3.9SPp- 一 2 


<% 

Response.Write "<center><table width='100%'><td>” 

Response.Write "欢迎 你 访问 华东 交通 大 学 的 教学 网 站 <br>" 
Response.Write "网 站 地 址 是 <a href='"http://cai.ecjtu.jx.cn/>"&"™ 
Response.Write "cai.ecjtu.jx.cn"&"™™""&"</a><br>" 

Response.Write "如 果 贵 单位 需要 该 教学 系统 ， 请 与 丁 振 凡 老 师 联系 <br>" 
Response.Write "email 地 址 : zfding@ecjtu.jx.cn</td><table>" 

%> 


运行 结果 如 图 4-4 所 示 。 
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图 4-4 Response 对 象 的 Write 方法 的 使 用 
【说 明 】 由 于 字符 串 用 双 引 号 作为 分 界 符 ， 所 以 在 字符 串 中 如 果 要 给 HTML 标记 的 属 

性 加 引号 应 采用 单 引 号 。 由 于 “%>” 和 “"” 两 个 符号 具有 特殊 的 含义 ， 因 此 输出 的 数据 
中 不 能 直接 包含 字符 ‘96>” 和 “"”， 如 果 确 实 需 要 输出 这 两 个 符号 ,可 用 转 义 序列 “%\>” 
来 表示 字符 “%>”， 使 用 两 个 相连 的 双 引 号 字符 表示 输出 一 个 双 引 号 。 

2. End 方法 

End 方法 使 Web 服务 器 停止 处 理 脚本 。 如 果 Response.Buffer 已 设置 为 True， 则 调用 
Response.End 会 立即 将 缓冲 区 中 的 内 容 发 送 给 浏览 器 。 

3.Flush 方法 

如 果 Response.Buffer 属性 设置 为 True， 则 执行 Flush 方法 会 立即 将 缓冲 区 中 的 内 容 发 
送 给 浏览 器 。 如 果 Response.Buffer 属性 设置 为 False， 则 该 方法 将 导致 运行 时 错误 。 

4. Redirect 方 法 

Redirect 方法 使 浏览 器 重 定向 到 指定 的 URL 网 址 。 其 语法 格式 如 下 : 

Response.Redirect URL 

【注意 】 使 用 Response.Redirect 方法 之 前 不 能 有 任何 输出 内 容 发 送 给 浏览 器 ， 因 为 它 

将 引导 浏览 器 打开 新 的 网 页 。 换 句 话 说 , 该 方法 要 放 在 程序 中 任何 会 产生 输出 的 语句 之 前 。 

S.Clear 方法 

Clear 方法 用 于 删除 缓冲 区 中 存在 的 所 有 HTML 内 容 。 但 要 注意 的 是 ， 如 果 未 将 Response. 
Buffer 设置 为 True， 则 该 方法 将 导致 运行 时 出 现 错误 。 如 果 要 取消 所 有 向 客户 端的 输出 ， 
可 首先 清空 缓冲 区 ， 然 后 调用 End 方法 。 以 下 代码 在 程序 内 出 错时 不 会 将 错误 报告 给 客 
户 端 。 


<% 

Response.Buffer=true 

On error resume next ““' 设 定 遇 到 错误 继续 执行 下 一 条 语句 
Err.clear %> 

其 他 HTML 和 ASP 代码 -一 -一 一 


<% 

if Err.number<>0 then 
Response.Clear 
Response.End 

End if 

%> 
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【说 明 】 这 里 用 到 了 ASP 的 错误 处 理 机 制 ， 其 相关 内 容 在 第 5 章 中 还 将 进一步 介 
6. BinaryWrite 方法 
BinaryWrite 方法 用 于 给 客户 端 发 送 非 字 符 类 型 的 数据 。 其 语法 格式 如 下 : 
Response.BinaryWrite 二 进 制 数据 
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绍 。 


通常 ，BinaryWrite 方法 要 结合 某 种 需要 接受 特殊 非 字符 信息 的 定制 HITP 客户 应 
序 一 起 使 用 。 


4.2.3 ”Response 对 象 的 数据 集合 


Response 对 象 只 有 一 个 Cookies 数据 集合 ， 该 数据 集合 允许 将 数据 保存 在 客户 端的 硬 
盘 中 ， 如 果 指 定 的 Cookie 不 存在 ， 则 创建 新 的 Cookie; 相反 ， 如 果 指 定 的 Cookie 存在 ， 


则 更 改 Cookie 的 属性 及 值 。 其 语法 格式 如 下 : 
Response.Cookies("Cookiesname")[(Key)|. Attribute]= Value 

其 中 ; 

口 ”Cookiesname 为 Cookie 的 名 称 。 


其 中 为 Key 的 子 键 。 
口 Attribute 代表 Cookie 自身 的 某 个 属性 ， 如 表 4-4 所 示 。 


表 4-4 Cookie 的 属性 
名 称 说 明 
Domain 写 。 若 被 指定 ， 则 只 有 某 个 网 域 可 以 存 取 该 Cookie 
写 。 指 定 Cookie 的 过 期 日 期 。 为 了 在 会 话 结束 后 将 Cookie 存储 在 客户 端 磁盘 上 ， 
须 设 置 该 日 期 。 若 此 项 属性 的 设置 未 超过 当前 日 期 ， 则 在 任务 结束 后 Cookie 将 到 期 
HasKeys 只 读 。 指 定 Cookie 是 否 包含 子 键 
口 


只 写 
只 
只 写 
只 
和 


Expires 


en 用 应 用 程序 的 路 径 

Secure | 只 写 . 指定 Cookie 是 否 安全 传送 ， 即 在 传输 过 程 中 是 否 要 加 密 
以 下 代码 将 显示 客户 请 求 中 传递 过 来 的 所 有 Cookie 变量 的 内 容 。 
<% 


For each cookie in Request.Cookies 
if Notcookie.HasKeys then 
Response.Write cookie & "=" & Request.Cookies(cookie) 
Else 
for each key in Request.Cookies(cookie) 
Response.Write cookie&"("&key&")"&"="& Request.Cookies(cookie)(key) 
next 
end if 
next 
%> 


口 Key 是 可 选 参数 ， 如 果 指 定 了 Key， 则 表明 Cookie 是 一 个 集合 ， 将 Value 赋值 给 


写 。 若 被 指定 ， 则 Cookie 将 只 发 送 到 对 该 路 径 的 请 求 中 。 如 果 未 设置 该 属性 ， 则 使 
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Cookie 按 其 生命 周期 可 划分 为 两 种 形式 ， 即 临时 性 Cookie 和 永久 性 Cookie。 临 时 性 
Cookie 在 浏览 器 关闭 时 自动 过 期 ， 而 永久 性 Cookie 的 过 期 时 间 取 决 于 其 Expires 的 属性 设 
置 。 如 果 未 设置 Expires 属性 ， 则 为 临时 性 Cookie。 

为 了 方便 Cookie 的 管理 ， 可 以 将 相关 的 Cookie 用 同一 变量 名 表示 ， 通 过 为 Cookie 设 
置 子 键 来 区 分 各 个 “ 子 Cookie”。 注 意 ， 带 有 子 键 的 Cookie 的 数据 内 容 是 一 个 集合 。 

【应 用 举例 】 在 网 络 考 试 系统 中 分 若干 环节 ， 包 括 组 卷 、 试 卷 显示 、 试 卷 评分 等 。 前 
面 阶 段 组 好 的 试题 可 以 利用 Cookie 记 录 下 来 一 种 办 法 是 将 选 好 的 试题 序号 拼接 为 字符 串 ， 
各 题 号 间 用 逗号 分 隔 。 例 如 ， 以 下 将 选取 的 单 选 题 编号 存 入 名 字 为 exam 且 子 键 为 danxuan 
的 Cookie 变量 中 。 


Response.Cookies("exam")("danxuan") = "10,101,103,302,..." 


在 以 后 阶段 ， 可 以 读 取 该 Cookie 变量 的 值 ， 并 利用 Split 函数 将 试题 序号 提取 并 存 入 
数组 中 以 便 访问 各 道 题 。 代 码 如 下 : 

shitiString = Request.Cookies("exam")("danxuan") 

shitiArray = Split(shitiString,",") 

考试 结束 后 要 将 相应 的 Cookie 立即 进行 过 期 处 理 , 避免 在 后 续 网 页 HTTP 请 求 继续 要 
传递 该 Cookie 变量 而 带 来 不 必要 的 开销 。 可 以 用 以 下 方法 让 某 Cookie 变量 立即 过 期 。 


Response.Cookies("exam").expires=now!() 


【 例 4-4】 利用 Cookie 记录 用 户 对 本 网 页 的 访问 次 数 和 最 近 访 问 时 间 

<% 

if request.Cookies("Vvisit")("num")="" then 
Response.Cookies("Vvisit")("num")=1 

else 
Response.Cookies("Vvisit")("num")=request.Cookies("visit")("num")+1 

end if 

Response.Cookies("visit")("lastvisit")=now 

Response.Cookies("visit").expires=date()+30 

Response.Write "访问 次 数 为 : "&request.cookies("visit")("num")&"<br>" 

Response.Write "最 近 访 问 时 间 " &request.Cookies("visit")("lastvisit") 

%> 


在 该 例 中 ， 首 先 读 取 Cookie 变量 Visit num， 检 查 用 户 端 计算 机 是 否 保存 有 该 名 称 的 
Cookie 变量 。 如 果 有 该 变量 ， 则 说 明 用 户 已 经 访问 过 该 页 面 ， 则 将 访问 次 数 增加 1， 同 时 
输出 访问 次 数 。 如 果 用 户 是 首次 访问 该 页 面 ， 则 将 Cookie 变量 Visit_ num 的 值 设 置 为 1 并 
写 入 客户 计算 机 。 

【应 用 实例 】 页 面 集合 的 共享 处 理 。 

某 组 页 面 集合 需要 在 应 用 中 多 处 用 到 ， 如 网 络 教学 测试 子 系统 ， 在 单元 过 关 测 试 和 网 
上 考试 中 均 要 用 到 ， 只 是 抽取 的 试题 不 同 。 可 以 采用 如 下 方法 实现 页 面 集 的 共享 ， 让 该 
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页 面 集 执行 完 后 ， 根 据 不 同调 用 处 的 个 性 化 要 求 返 回 到 各 自 页 面 。 

为 了 实现 该 目标 ， 可 以 借助 Cookie 记录 要 返回 点 的 URL 地 址 。 在 进入 页 面 集 前 设 轩 
要 返回 的 URL 地 址 。 例 如 : 
Response.Cookies("next_page")="student_main.asp" 
而 在 页 面 集 出 口 点 的 页 面 安排 输出 如 下 代码 , 让 其 自动 执行 客户 端 脚本 返回 目标 页 面 。 
Response.Write "window.location="&request.cookies("next_page")&";" 
其 中 ，window.location 代表 浏览 器 窗 体 对 象 的 地 址 设置 。 


4.3 ”Session 对 象 


前 面 已 知道 ， 可 以 利用 Cookie 保存 客户 的 状态 信息 。 但 Cookie 保存 在 客户 端 ， 与 网 
站 相关 的 所 有 Cookie 的 信息 会 随 每 次 HTTP 请 求 传递 给 服务 器 , 不 管 当前 处 理 程序 是 否 需 
要 这 些 Cookie。 显 然 ， 过 量 使 用 Cookie 会 占用 大 量 的 信息 传递 开销 。 而 Session 对 象 的 引 
入 可 避免 此 类 问题 ，Session 是 将 用 户 状态 信息 保存 在 服务 器 端 。 

客户 如 何 与 服务 器 端的 Session 取得 关联 呢 ? 它 是 通过 向 客户 端 发 送 能 代表 Session 对 
象 唯一 标识 的 一 个 Cookie 对 象 来 实现 与 Session 关联 的 。 当 用 户 第 一 次 请 求 ASP 应 用 的 某 
个 页 面 时 ， 服 务 器 要 检查 HTTP 头 信息 ， 查 看 是 否 有 名 为 ASPSESSIONID 的 Cookie 发 送 
过 来 ， 如 果 有 ， 则 使 用 原来 会 话 ， 否 则 服务 器 会 启动 一 个 新 会 话 ， 并 为 该 会 话 生成 一 个 全 
局 唯一 的 SessionID， 通 过 Cookie 发 送 给 客户 端 。 每 个 用 户 依据 各 自 的 SessionID， 就 可 以 
访问 存储 在 服务 器 上 的 属于 自己 的 状态 信息 。 

需要 注意 的 是 ， 会 话 状态 仅 在 支持 Cookie 的 浏览 器 中 保留 ， 如 果 客 户 关 闭 了 Cookie 
选项 ，Session 也 就 不 能 发 挥 作用 了 。 


4.3.1 ”Session 对 象 的 属性 


1. SessionID 

SessionID 属性 返回 用 户 的 会 话 标识 。 会 话 标识 为 长 整数 类 型 。 

2. Timeout 

Timeonut 属性 以 分 钟 为 单位 为 Session 对 象 指定 超时 时 限 。 如 果 用 户 在 超时 时 限 内 不 刷 
新 或 未 发 出 新 的 网 页 访问 请 求 ， 则 其 会 话 将 终止 。 会话 的 超时 时 间 默 认为 20 分 钟 。 可 以 通 
过 Intemet 服务 管理 器 中 的 相关 设置 改变 默认 超时 限制 值 。 在 ASP 程序 代码 中 也 可 修改 
Timeout 属性 值 。 应 依据 Web 应 用 程序 的 要 求 和 服务 器 的 内 存 空间 来 设置 此 值 。 过 长 的 会 
话 超时 值 将 会 导致 打开 的 会 话 过 多 而 耗 尽 服务 器 的 内 存 资源 。 

【应 用 提示 】 考 虑 到 Timeout 的 最 大 值 限制 ， 网 络 考试 系统 中 通常 用 Cookie 来 保存 用 
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户 的 状态 信息 ， 因 为 用 户 在 解答 试卷 的 过 程 中 不 会 与 服务 器 交互 ， 考 试 时 间 可 能 较 长 。 


4.3.2 ”Session 对 象 的 方法 


Session 对 象 仅 有 一 个 Abandon 方法 ， 用 于 删除 所 有 存储 在 Session 对 象 中 的 对 象 并 释 
放 这 些 对 象 的 资源 。 当 会 话 超时 时 ， 服 务 器 也 将 删除 Session 对 象 。 
在 Session 对 象 中 既 可 以 存储 简单 的 数据 类 型 的 数据 ,也 可 以 存储 普通 的 对 象 引用 。 例 如 : 


<% 

Set rs=Server.createObject("ADODB.RecordSet ) 
Set Session("myrs")=rs 

%> 


【注意 】 在 ASP 中 进行 对 象 引用 赋值 时 ， 前 面 要 加 上 Set 关键 词 。 
另外 ， 还 可 用 Session 对 象 来 保存 数组 信息 ，Session 变量 存储 的 是 整个 数组 。 例 如 : 


<% 

dim arr(4) 
arr(0)=" 中 国 " 

arr(1)=" 美 国 " 
Session("myarray")=arr 
%> 


在 后 续 页 面 中 可 将 Session 变量 赋值 给 某 个 变量 ， 从 而 通过 该 变量 访问 数组 元 素 。 例 如 ， 


<% 

a= Session("myarray") 

foreach kin a 
Response.Write k & "<br>" 

next 

%> 


4.3.3 Session 对 象 的 事件 


Session 对 象 的 事件 有 Session OnStart 和 Session OnEnd 两 个 ， 分 别 用 于 Session 对 象 
的 启动 和 释放 。 

1. Session OnStart 事件 

Session OnStart 事件 在 服务 器 创建 新 会 话 时 发 生 ， 并 且 服 务 器 在 执行 请 求 的 页 之 前 先 
处 理事 件 的 脚本 代码 。 该 事件 是 对 Session 变量 进行 初始 设置 的 最 佳 时 机 。 

为 了 确保 用 户 启动 会 话 时 始终 要 打开 某 个 “开始 ”页 ， 可 以 在 Session_OnStart 事件 脚 
本 代码 中 检查 用 户 打 开 的 页 是 否 是 “开始 ”页 ， 如 果 不 是 ， 就 调用 Response.Redirect 方法 
转向 “开始 ”页 。 程 序 代码 如 下 : 
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<SCRIPT RUNAT=Server Language=VBScript> 
Sub Session_OnStart 
startPage = "login.asp" 
currentPage = Request.ServerVariables("SCRIPT_ NAME") 
if currentPage<>startPage then 
Response.Redirect(startPage) 
end if 
End Sub 
</SCRIPT> 


【注意 】 在 内 置 对 象 中 ， 只 有 Application、Server 和 Session 对 象 可 以 出 现在 Session 
事件 的 代码 中 。 
2. Session_OnEnd 事件 


Session_ OnEnd 事件 在 会 话 被 放弃 或 会 话 超时 时 发 生 。 如 果 用 户 在 指定 时 间 内 没有 请 求 
或 刷新 应 用 程序 中 的 任何 页 ， 则 会 话 将 自动 结束 。 在 该 事件 代码 中 可 安排 会 话 结束 时 需要 
做 的 工作 ， 通 常安 排 清理 系统 对 象 、 释 放 系 统 资源 的 脚本 。 

【注意 】 以 上 两 个 事件 的 代码 必须 包含 在 Global.asa 文件 中 。 


4.4 Application 对 象 


Application 对 象 是 Web 应 用 程序 级 的 对 象 , 这 里 的 应 用 程序 是 由 虚拟 目录 及 其 子 目 录 
下 的 所 有 .asp 文件 构成 的 。 每 个 Web 站 点 可 设置 多 个 虚拟 目录 , 也 就 是 每 个 Web 站 点 可 以 
有 多 个 Web 应 用 。 
Application 对 象 存储 的 数据 可 以 被 一 个 应 用 的 所 有 用 户 共享 ， 并 可 以 在 服务 器 运行 期 
间 持 久 地 保存 数据 。 以 下 代码 显示 了 用 Application 对 象 存储 字符 串 和 对 象 的 方法 。 
<% 
Application("MyVar") = "Hello" 
Set Application("MyObj") = Server.CreateObject("MyComponent") 
%> 
【注意 】 
(1) 不 能 在 Application 对 象 中 存储 ASP 内 建 对 象 。 
(2) 可 将 一 个 数组 存储 在 Application 对 象 中 ， 但 不 能 直接 用 Application 访问 数组 元 
素 。 例 如 ， 下 列 脚本 无 法 运行 : 


Application("StoredArray")(3) = "new value" 
可 先 将 Application 存储 的 数组 赋 给 某 变量 ， 然 后 通过 该 变量 访问 数组 元 素 。 例 如 : 
Myarray = Application("StoredArray ) 


Myarray(3)= "new value" 更 改 数组 元 素 
Application("StoredArray")= Myarray 
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Application 对 象 与 Session 对 象 在 数据 存储 与 访问 形式 上 相同 , 但 本 质 上 存在 以 下 两 点 
明显 差异 : 
(1) 作用 范围 不 同 。Session 对 象 是 每 个 用 户 各 自 的 ， 各 用 户 同 名 的 Session 变量 互 不 
干涉 ; 而 Application 对 象 是 所 有 用 户 共享 的 ， 可 以 理解 为 应 用 级 的 全 局 变量 。 
(2) 存活 周期 不 同 。Session 对 象 依赖 用 户 的 会 话 存在 ， 一 旦 会 话 终 止 ， 则 该 用 户 的 
Session 对 象 就 被 删除 ， 而 Application 对 象 的 存活 周期 跨度 为 整个 应 用 的 开始 和 停止 时 间 。 


4.4.1 Application 对 象 的 方法 


Application 对 象 为 多 用 户 共 享 ， 为 了 防止 多 个 用 户 同 时 修改 Application 对 象 ， 保 证 数 
据 的 一 致 性 和 完整 性 ， 在 修改 Application 对 象 时 需要 进行 加 锁 。Application 对 象 提供 两 个 
方法 用 于 加 锁 和 解锁 处 理 。 

1. Lock 方法 

Lock 方法 用 于 锁定 Application 对 象 ， 只 有 取得 了 锁 的 那个 用 户 的 ASP 程序 才 允 许 修 
改 Application 对 象 的 值 。 

2. Unlock 方法 

与 Lock 方法 相反 ，Unlock 方法 用 于 解除 锁定 ， 以 便 允 许 其 他 客户 修改 Application 对 
象 的 属性 。 在 用 Lock 方法 锁定 对 象 之 后 ， 如 果 用 户 没 有 明确 调用 Unlock 方法 ， 则 服务 器 
将 在 ASP 程序 执行 结束 或 脚本 执行 出 现 超时 时 自动 解除 对 Application 对 象 的 锁定 。 

【 例 4-5】 用 Application 对 象 记录 页 面 访问 次 数 


一 ---eXx4-5.asp---- 一 -一 一 -一 -一 
<% 
Application.Lock 
if Application("NumVisits")="" then 
Application("NumVisits")=1 
else 
Application("NumVisits") = Application("NumVisits") + 1 


end if 

Application.Unlock 

Response.Write "你 是 本 页 的 第 " & Application("NumVisits") & "位 访客 !" 
%> 


【应 用 】 将 以 上 脚本 嵌入 到 某 个 ASP 文件 中 ， 就 可 为 该 页 面 添加 一 个 计数 器 。 
4.4.2 Application 对 象 的 事件 


Application 对 象 的 事件 有 Application OnStart 事件 和 Application OnEnd 事件 。 
1. Application_ OnStart 事件 
Application OnStart 事件 是 在 Web 服务 器 启动 后 ， 第 一 个 用 户 访问 首次 请 求 应 用 程序 
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时 发 生 ， 且 它 在 第 一 个 用 户 的 Session OnStart 事件 前 发 生 。Application OnStart 事件 主要 
用 于 应 用 的 初始 化 设置 。 事 件 处 理 方法 形式 如 下 : 
Sub Application OnStart 
事件 处 理 代码 
End Sub 


2. Application_OnEnd 事件 
Application_OnEnd 事件 在 服务 器 关闭 时 发 生 ， 用 于 实现 应 用 的 清理 工作 。 事 件 处 理 方 
法 形式 如 下 : 
Sub Application OnEnd 
事件 处 理 代码 
End Sub 
以 上 两 个 事件 的 代码 均 安 排 在 Globalasa 文件 中 。 


4.4.3 Globalasa 文件 


Global.asa 文件 是 一 个 可 选 文件 , 在 该 文件 中 安排 Application 对 象 和 Session 对 象 的 事 
件 脚 本 。 注 意 ， 该 文件 必须 放 在 Web 应 用 程序 的 根 目录 下 〈 包 括 虚 拟 目 录 ) 。 
【 例 4-6】 统计 网 站 访问 次 数 和 当前 在 线 人 数 
文件 1: Global.asa 文件 


< --Global.asaw——----- 
<script language="vbscript" runat="server"> 
Sub Application_OnStart() 
Application("count")=0 
Application("online")=0 
end Sub 
Sub Session_OnStart() 
Application("count")=Application("count")+1 
Application("online")=Application("online")+1 
end Sub 
Sub Session_OnEnd() 
Application("online")=Application("online")-1 
end Sub 
</script> 


文件 2: 计数 显示 的 ASP 程序 


一 -ex4-6.asp: - -i i 
<table width="624" height="47" border="1"> 

<tr><td width="159"> 访 问 次 数 : </td> 

<td width="449"><%=Application("count")%></td></tr> 

<tr><td> 在 线 人 数 : </td><td><%=Application("online")%></td></tr> 

</table> 
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【说 明 】 由 于 Application 对 象 的 生命 周期 特点 ， 这 里 统计 的 用 户 访问 次 数 均 以 应 用 的 
启动 和 停止 为 界 。 如 果 要 考虑 历史 访问 的 情形 ， 则 要 用 文件 或 数据 库存 储 数据 。 可 以 在 
Application 启动 时 读 取 历 史 数 据 ， 而 在 Application 停止 时 将 数据 写 入 文件 或 数据 库 。 

【 例 4-7】 简单 在 线 讨 论 区 编程 

以 下 为 一 个 在 线 讨论 区 的 简单 实现 。 在 用 户 进入 讨论 区 前 先 输入 一 个 “昵称 ”， 在 讨 
论 区 中 显示 在 线 用 户 个 数 ， 假 定 退 出 讨论 区 时 要 求 用 户 单 击 “ 退 出 ” 超 链接 。 讨 论 区 显 
示 的 发 言 条 目 为 最 近 的 15 条 发 言 。 帖 子 和 当前 在 线 用 户 信息 分 别 用 message 和 user 两 个 
Application 变量 存储 。 

为 了 让 用 户 及 时 看 到 讨论 区 上 的 发 言 ， 必 须 让 显示 讨论 区 内 容 和 用 户 列表 的 页 面 保持 
自动 定时 刷新 。 页 面 自动 刷新 处 理 办 法 之 一 是 在 网 页 的 head 部 分 加 入 如 下 HTML 标记 行 : 


<meta http-equiv="refresh" content="5"> 


此 时 即 让 网 页 每 隔 5 秒 更 新 一 次 。 
旦 序 1: 讨论 区 登录 页 面 
讨论 区 登录 页 面 获取 用 户 标识 ， 并 将 该 标识 保存 在 Cookie 变量 中 。 


| login.asp------ 一 -一 
<% 
if request("name")<>"" then 
User= request("name") 
Response.Cookies("username")= user 
application.lock 
"将 用 户 名 加 入 在 线 用 户 中 
application("user")= user +"<br>"+application("user") 
application.unlock 
Response.Redirect("enter.asp") 
End if 
9%> 
<h2 align="center"> 在 线 讨论 区 </h2> 
<form name="f1" action="login.asp" method="post"> 
<div align="center"> 
请 输入 用 户 名 : <input type="text" name="name" size="10"> 
<input type="submit" name="b1" value=" 登 录 "></div> 
</form> 


运行 结果 如 图 4-5 所 示 。 
【说 明 】 本 例 表单 提交 和 表单 生成 为 同一 ASP 文件 ， 也 就 是 采用 自 提交 方式 ， 这 样 设 
计 的 优点 是 可 减少 ASP 文件 的 数量 ,便于 应 用 管理 。 但 缺点 是 容易 出 现代 码 设 计 上 的 考虑 
不 足 。 原 因 是 在 同一 文件 中 既 要 考虑 未 提交 前 表单 的 生成 ， 还 要 考虑 表单 提交 的 处 理 。 程 
序 中 将 登录 名 保存 到 名 为 usemame 的 Cookie 变量 中 , 并 通过 字符 串 拼 接 存储 到 application 
("user") 变 量 中 ， 然 后 转向 讨论 区 主 界面 。 
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http: /localhost/s/1oin sp Mic 二 加 区 
|」 文件 四 “弓手 四 ”查看 胃 ” 收 立国 “工具 四 大助 | 车 
[WE | http: /ocahost/r/login am eSEa 
习 
在 线 讨论 区 


请 输入 用 户 名 : 三” 攻 到 


图 4-5 讨论 区 登录 页 面 


程序 2: 讨论 区 的 框架 页 面 


一 -一 -enter.asp----- 一 -一 -一 -一 -一 -一 -一 一 一 -一 -一 -一 一- 一 -一 
<% if request.cookies("username")= ”then 
Response.Redirect("login.asp") 
end if %> 
<frameset rows="80%,*" frameborder=0 framespacing=0> 
<frame name="up" src="message.asp" > 
<frame name="down" src="speak.asp"> 
</frameset> 


【说 明 】 在 该 页 面 首先 检查 用 户 是 否 登 录 过 ， 若 未 登录 ， 则 转向 登录 页 面 。 该 页 面 由 
上 下 两 个 框架 构成 ， 上 面 的 一 个 框架 显示 讨论 区 内 容 和 在 线 用 户 ， 下 面 的 框架 含有 输入 发 
言 的 表单 。 

旺 序 3: 输入 发 言 的 处 理 页 面 


SPpeak.asp-- 一 一 -一 
<% 
if request("speak")=" 发 言 " then 
name = request.cookies("username") 
content = request.form("content") 
application.lock 
application("message")=name+":"+content+"<br>"+application("message") 
application.unlock 
show=application("message") 
' 确 保 显示 最 近 的 15 条 信息 ， 其 他 内 容 删 除 
i=1 
forn=1to 15 
i=instr(i,show,"<br>")+3 
if i=3 then exit for 
next 
ifi<>3 then 
application.lock 
application("message")=left(show,i) 
application.unlock 
end if 
end if 
%> 
<form method="post" action="speak.asp"> 请 发 言 : 
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<input type="text" name="content" size="30"> 

<input name="speak" type="submit" value=" 发 言 ">&nbsp;&nbsp; 
<a href="logout.asp" target="_parent"> 退 出 </a> 

</form> 


【说 明 】 这 是 一 个 自 提交 处 理 页 面 ， 将 输入 的 发 言 通过 字符 串 拼 接 的 办 法 写 入 名 为 
message 的 Application 变量 中 ， 并 清理 其 中 的 内 容 ， 而 只 保存 最 近 的 15 条 发 言 。 
程序 4: 发言 和 在 线 用 户 显示 页 面 


> ---MeSSage.asp-— 
<html> 

<head> 

<META HTTP-EQUIV="REFRESH" CONTENT="5"> 

</head> 

<body> 

<center><h1> 在 线 讨论 区 </h1></center> 

<table width="100%"> 

<td width="80%"> 

<%=application("message")%> 

</td> 

<td width="20%" > 

<div align=center> 在 线 用 户 : </div><hr> 

<%=application("user")%> 

</td> 

</body> 

</html> 

程序 5: 用 户 退出 处 理 程序 

一 ---logout.asp---- 一 -一 -一 -一 -一 


<% 

x= application("user") 
User=request.cookies("username") 
pos=instr(x,user) 
x=left(x,pos-1)+mid(x,pos+len(user+"<br>")) 
application.lock 

application("user")=x 

application.unlock 
Response.Redirect("login.asp") 

%> 


【说 明 】 用 户 退 出 要 解决 的 问题 是 将 用 户 从 Application 变量 user 中 删除 ， 同 时 离开 讨 
论 区 ， 并 重 定向 到 登录 页 面 。 
程序 6: Global.asa 文件 


-> ~ Global.asa- 一 -一 -一 -一 -一 - > 
<script language=VBScript runat=server> 
sub Application_OnStart 

application("user")="™™ 
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application("message")="" 
end sub 
</script> 


【说 明 】 利 用 Application OnStart 事件 解决 Application 对 象 的 初 值 设置 ， 此 时 也 可 以 
不 使 用 该 文件 ， 因 为 这 里 设置 的 初 值 均 为 空 串 ， 与 变量 默认 值 是 相同 的 。 
运行 结果 如 图 4-6 所 示 。 


| 和 
ES ee EPL 
在 线 讨 论 区 
在 线 用 户 
小 明 :人 气 太 低 
jerry: 关 家 好 re 


请 发 言 站 JE 这 出 
EE 三 三 厂矿 厂 厢 有三 


图 4-6 讨论 区 发 帖 界面 


4.5 Server 对 象 


Server 对 象 提供 了 一 系列 方法 以 实现 典型 操作 的 使 用 ， 以 及 对 服务 器 功能 的 扩展 。 
Server 对 象 的 语法 格式 如 下 : 
Server. 属 性 | 方法 


4.5.1 Server 对 象 的 属性 


Server 的 属性 只 有 ScriptTimeout， 该 属性 用 于 设置 一 个 ASP 程序 所 允许 的 最 长 执行 时 
间 ， 在 脚本 运行 超过 这 一 时 间 之 后 即 作 超时 处 理 ， 其 设置 以 “ 秒 ”为 单位 ， 系 统 的 默认 值 
为 90 秒 。 其 语法 格式 如 下 : 

Server.ScriptTimeout= 秒 数 

ScriptTimeout 属性 不 能 设置 为 小 于 系统 指定 的 默认 值 ， 否 则 仍 以 默认 值 为 准 ， 当 然 也 
可 以 在 IS 管理 器 中 修改 系统 默认 值 。 


4.5.2 Server 对 象 的 方法 


1. CreateObject 方法 


CreateObject 方法 用 于 创建 已 经 注册 到 服务 器 上 的 ActiveX 组 件 实例 。 这 是 一 个 非常 重 
要 的 方法 ， 使 用 该 方法 可 以 使 ASP 程序 利用 服务 器 的 组 件 不 断 扩展 新 的 功能 ， 如 数据 库 的 
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存 取 、 文 件 存 取 、 广 告 轮 显 、 文 件 上 传 等 。CreateObject 方法 的 语法 格式 如 下 : 

Server.CreateObject("ActiveX 组 件 ") 

这 里 的 ActiveX 组 件 可 以 是 ASP 的 所 有 内 置 组 件 ， 也 可 以 是 第 三 方 组 件 ， 但 不 能 是 
ASP 内 置 对 象 。ASP 的 常用 内 置 组 件 有 文件 访问 组 件 (Scripting.FileSystemObject) 、 广 告 
轮 显 组 件 (MSWC.AdRotator) 、 内 容 链 接 组 件 (MSWC.NextLink) 、 计 数 器 组 件 (MSWC. 
Counters) 。 后 面 3 个 组 件 功能 相对 有 限 ， 文 件 访问 组 件 功能 很 强 ， 它 可 以 对 服务 器 上 的 文 
件 和 目录 进行 管理 和 访问 。 黑 客 常 利用 文件 访问 组 件 破 坏 系统 ， 为 了 减少 系统 漏洞 ， 常 将 
该 组 件 设 为 禁用 。 

为 了 实现 对 数据 库 的 访问 ，ASP 提供 了 ADO 系列 组 件 ， 例 如 ， 下 面 的 代码 用 于 创建 

Set Conn = Server.CreateObject("ADODB.Connection ) 

如 果 创 建 的 对 象 不 再 需要 使 用 ， 可 以 用 如 下 方法 释放 所 占用 的 资源 。 


Set Conn = nothing 


2. MapPath 方法 

MapPath 方法 将 指定 的 虚拟 路 径 〈 相 对 路 径 ) 映射 到 物理 路 径 〈 即 真实 路 径 ) 。 这 在 
实际 应 用 中 是 很 有 用 的 ， 一 般 情况 下 ， 文 件 路 径 用 虚拟 路 径 来 表示 ， 但 有 时 必须 使 用 物理 
路 径 ， 如 文件 上 传 或 对 服务 器 上 的 文件 进行 读 写 操作 时 必须 使 用 物理 路 径 。 

MapPath 方法 的 语法 格式 如 下 : 

Server.MapPath(" 虚 拟 路 径 ") 

如 果 Path 以 一 个 正 斜 枉 〈/) 或 反 斜 杠 \) 开始 ， 则 MapPath 方法 以 Web 应 用 的 根 目 
录 〔 含 虚拟 目录 的 根 ) 作为 相对 点 ;如 果 Path 不 是 以 斜 杠 开始 ， 则 MapPath 方法 以 当前 
ASP 文件 的 路 径 作 为 相对 点 。 

例如 ，test.asp 文件 和 数据 库 文件 data.mdb 都 位 于 目录 Ci\Inetpub\Wwwwroot\ 下 ， 在 test. 
asp 文件 中 执行 如 下 脚本 : 

<%= Server.MapPath("cai\data.mdb")%> 


则 相应 的 输出 结果 为 cx\inetpubvwwwrootvcaivdata mdb 。 
【注意 】Server.MapPath 方法 并 不 检查 指定 路 径 和 文件 是 否 存在 ， 路 径 的 正确 性 由 程 

序 员 自 己 把 握 。 

3. URLEncode 方法 

在 URL 字符 串 中 不 允许 出 现 空格 等 特殊 字符 ， 使 用 URLEncode 方法 可 以 使 这 些 字符 
加 入 URL 时 转换 成 URL 中 等 效 的 字符 。 例 如 ， 空 格 用 “+” 代 替 ，ASCII 码 大 于 126 的 字 
符 用 “%” 后 跟 十 六 进 制 代码 进行 替换 。 在 实际 应 用 中 ， 经 常用 URL 参数 为 超 链 接 的 目标 
传递 动态 信息 ， 可 以 采用 URLEncode 方法 进行 数据 包装 处 理 。 例 如 : 


<% Response.Write ServerURLEncode("x.asp?user=Nace Coer ) %> 
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将 得 到 的 结果 是 x%2Easp%3Fuser%3DNace+Coer。 

4. HTMLEncode 方法 

HTMLEncode 方法 是 对 指定 的 字符 串 进行 HTML 编码 。 其 语法 格式 如 下 : 

Server.HTMLEncode(string) 

如 果 想 在 目标 页 面 中 显示 HTML 文本 或 ASP 脚本 代码 ， 需 要 用 HTMLEncode 方法 。 
例如 ， 以 下 代码 能 在 页 面 上 看 到 <br> 的 文字 ， 而 不 是 换行 效果 。 


<% Response.Write server.HTMLEncode("<br> 能 看 见 吗 ?")%> 


【应 用 实例 】 在 很 多 数据 录入 应 用 中 ， 如 试题 库 、 网 上 作业 、 讨 论 等 ， 从 文本 框 输入 
的 数据 需要 按照 原样 显示 ,因此 可 以 使 用 HTMLEncode 方法 将 数据 库 中 读 取 的 内 容 进 行 变 
换 后 输出 显示 。 

S.， Transfer 方法 


Transfer 方法 的 作用 是 将 ASP 程序 的 当前 控制 权 转 移 到 另 一 个 指定 的 ASP 程序 。 其 功 

能 类 似 于 Response 对 象 的 Redirect 方法 。 两 者 的 主要 差别 如 下 : 

(1) 执行 过 程 和 目标 对 象 不 同 。 当 执行 Response.Redirect 方法 后 ， 服 务 器 将 方法 指定 
的 地 址 发 送 给 浏览 器 ， 由 浏览 器 请 求 新 地 址 ， 所 以 Response.Redirect 方法 的 目标 地 址 可 以 
是 任何 URL 地 址 ; 而 执行 Server.Transfer 方法 是 直接 由 服务 器 将 代码 执行 流程 转向 指定 的 
ASP 文件 ， 目 标 地 址 只 能 是 同一 站 点 的 当前 目录 或 子 目 录 下 的 页 面 文件 。 

(2) 传递 的 URL 参数 的 数据 量 不 同 。Response.Redirect 方法 传递 的 数据 量 受 浏览 器 
地 址 栏 的 限制 ， 最 大 为 2K， 而 Server.Transfer 方法 传递 的 数据 量 可 超过 2K。 


本 章 小 结 


本 章 介 绍 了 ASP 的 Response、Request、Session、Application、Server 等 内 置 对 象 的 基 
本 使 用 方法 ， 读 者 要 熟练 掌握 这 些 对 象 的 属性 和 方法 的 使 用 。 有 具体 包括 Request 对 象 和 
Response 对 象 的 使 用 方法 ， 利 用 Request 对 象 的 数据 集合 获取 客户 提交 数据 的 方法 ， 利 用 
Response 对 象 的 给 客户 浏览 器 发 送 响应 信息 和 重 定向 的 方法 ;利用 Cookie 和 Session 保存 
用 户 的 状态 信息 的 方法 ; 利用 Application 对 象 实现 信息 的 共享 访问 的 方法 ; 了 解 Globalasa 


文件 中 Session 和 Application 对 象 的 事件 编程 ; 熟悉 Server 对 象 的 常用 方法 的 使 用 特点 等 。 
习题 
1. 选择 题 


(1) 若 要 停止 ASP 程序 的 执行 并 将 存放 在 缓冲 区 的 输出 传送 至 浏览 器 端 ， 可 以 使 用 
Response 对 和 象 的 ( ) 方法 。 
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A. Clear B. Flush 
C. End D. Wnte 
(2) 若 要 将 浏览 器 端 导向 至 其 他 网 页 ， 可 以 使 用 Response 对 象 的 〈 ) 方法 。 
A. Redirect B. End 
C. Flush D. AppendToLog 


(3) 下 列 有 关 Response.Write 方法 的 说 法 正确 的 是 ( os 
A， 若 要 显示 的 信息 包含 双 引 号 ， 必 须 将 双 引 号 “"” 改 为 单 引号 “” 
B. 若 要 显示 的 信息 包含 双 引 号 ， 必 须 将 双 引 号 “"” 改 为 两 个 双 引 号 “"” 
C. 若 要 显示 的 信息 包含 %>， 必 须 改 为 \%> 
D. 若 要 显示 的 信息 包含 %>， 必 须 改 为 %\> 
(4) 使 用 Response 对 象 的 〈 ) 属性 可 设置 放 进 缓存 区 的 网 页 的 逾期 时 间 长 短 。 
A. CacheControl B. Buffer 
C. Status D. Expires 
(5) 关于 Cookie 的 缺点 ， 下 列 说 法 正确 的 是 5 
A. 造成 浏览 器 端 有 安全 上 的 威胁 
B. Cookie 会 自动 消失 
C. Cookie 可 以 记录 对 象 、 数 组 等 复杂 的 数据 类 型 
D. Cookie 可 能 被 禁止 写 入 浏览 器 端 
(6) 下 列 〈 ) 环境 变量 可 以 返回 服务 器 端的 也 地址 。 


A. Path Info B. Local Addr 
C. Remote Addr D.: URL 
(7) Application 对 象 只 能 记录 变量 、 字 符 串 、 日 期 等 简单 的 数据 类 型 ， 此 说 法 (  )。 
A. 正确 B. 不 正确 
(8) 若 要 在 完成 目前 的 网 页 之 后 便 结 束 Session 对 象 ， 可 以 使 用 ( ) 方法 。 
A. Clear B. End 
C. Timeout D. Abandon 


(9) 下 列 语句 中 说 法 正确 的 是 矢志 
A. Session 对 象 无 法 记录 数组 、 对 象 等 复杂 的 数据 类 型 
B. Session 对 象 存 储 在 服务 器 的 内 存 ， 一 旦 有 很 多 浏览 器 进行 联机 ， 效 率 将 会 
降低 
C. 无 论 在 何 种 情况 下 ，SessionID 都 是 唯一 的 
D. Timeout 属性 的 值 越 大 ， 所 占用 的 内 存 越 多 
(10) 下 列 叙 述 错误 的 是 〈 Ye 
A. Application 对 象 的 OnStart 事件 发 生 于 Web 服务 器 开始 执行 时 
B. Session 对 象 的 OnEnd 事件 发 生 于 浏览 器 与 服务 器 断 线 时 ， 或 者 浏览 者 在 
Session.Timeout 指定 的 时 间 内 没有 访问 网 页 时 
C. 若 要 设置 Session 对 象 的 初始 值 ， 可 以 在 Global.asa 文件 内 进行 设置 


第 4 章 ASP 的 内 置 对 象 he 


D. Global.asa 文件 应 放 在 和 网 页 相同 的 文件 夹 内 
(11) 若 要 将 字符 串 进行 编码 ， 使 它 不 会 被 浏览 器 解释 为 HIML 语法 ， 可 以 使 用 Server 
对 象 的 六 方法 * 


A. HIMLEncode B. URLEncode 
C. MapEncode D. ASPEncode 
2. 编程 题 


(1) 编写 ASP 程序 查看 今天 的 日 期 ， 根 据 奇偶 性 不 同 显示 不 同 风格 的 页 面 。 

(2) 编写 ASP 程序 显示 系统 目前 的 时 间 ， 包 括 日 期 、 时、 分 、 秒 。 

(3) 编写 ASP 程序 ， 限 制 用 户 人 P 地 址 为 某 个 地 址 区 间 的 允许 访问 网 页 (如 以 192.168.0 
开头 的 ) ， 显 示 欢 迎 信息 ， 和 否则 显示 “禁止 访问 ”。 

(4) 编写 用 户 登 录 页 面 ， 只 有 程序 中 指定 的 用 户 名 、 密 码 才能 登录 成 功 。 在 登录 成 功 
后 转向 的 页 面 中 显示 “XXX 用 户 ， 欢迎 你 使 用 本 系统 ”。 分 别 采用 Cookie 变量 或 Session 
变量 保存 用 户 名 给 后 续 页 面 访问 。 

(5) 编写 程序 实现 如 图 4-7 所 示 的 个 人 小 档案 调查 的 表单 界面 ， 并 编写 表单 处 理 程序 
将 表单 提交 后 用 户 填写 的 数据 显示 出 来 。 

加 la 


文件 EE) 编辑 EF) 查看 如 收藏 工具 加 帮助 人 D [3 
地 址 名 ) 四 http://localhestyst/x.asp 习 回 和 到 


个 人 小 档案 


名 
性 别 ， 
景 高 学 历 ， 


两 中 以 下 
其 他 信息 8 
ee ? 
口 听 音 乐 口水 上 运动 口 旅行 


口 阅读 口 把 他 
您 对 于 目前 的 “哈日 风 ”有 何 看 法 ? 


图 4-7 个 人 小 档案 调查 的 表单 界面 


(6) 编写 一 个 网 上 职业 投票 应 用 ， 选 出 大 众 最 喜欢 的 职业 。 利 用 Application 对 象 记 
录 每 个 行业 的 得 票数 量 。 此 时 可 以 假设 几 个 职业 作为 投票 调查 对 象 。 
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在 实际 应 用 系统 中 ， 通 常用 数据 库存 储 数 据 信 息 。 本 章 将 介绍 如 何在 ASP 脚本 代码 中 
通过 ADO 对 象 访问 关系 数据 库 表格 中 的 数据 。 作 为 本 章 的 基础 ， 首 先 对 关系 数据 库 中 的 
查询 语言 一 一 SQL 语言 进行 简要 介绍 。 


5.1 结构 化 查询 语言 SQL 


SQL 语言 是 一 种 通用 的 数据 库 查 询 语言 ,目前 绝 大 多 数 的 数据 库 均 支持 这 种 查询 语言 ， 
如 Access、MySQL、SQL Server、Oracle、SyBase 等 。SQL 语言 已 成 为 用 户 与 基于 SQL 的 
DBMS 的 接口 ， 其 主要 功能 包括 以 下 方面 。 

(1) 数据 定义 功能 : 用 于 定义 数据 库 表格 中 数据 的 组 织 和 结构 。 

(2) 数据 检索 功能 : 用 于 从 数据 库 中 检索 数据 。 

(3) 数据 操纵 功能 : 可 以 更 改 数据 库 内 容 ， 包 括 增加 、 删 除 和 修改 等 操作 。 


5.1.1 SQL 命令 的 基本 构成 


SQL 命令 主要 由 命令 、 子 句 、 运 算 符 和 函数 等 构成 。 命 令 可 以 分 为 数据 定义 语言 (CDDL) 
和 数据 操纵 语言 (DML) 两 大 类 。 数 据 定义 语言 用 于 创建 或 修改 数据 库 、 表 索引 文件 ， 数 
据 操纵 语言 用 于 对 数据 进行 查询 、 修 改 、 删 除 和 插入 操作 。 需 要 注意 的 是 ，SQL 命令 不 区 分 
大 小 写 ， 在 命令 中 使 用 的 字符 串 常 量 用 单 引号 或 双 引号 括 起 来 ， 日 期 常量 用 单 引号 括 起 来 。 
1. SQL 命令 及 子 句 
(1) 数据 定义 命令 
口 ”CREATE: 用 于 创建 数据 库 、 表 和 索引 。 
口 DROP: 用 于 删除 数据 库 及 数据 库 中 的 表 和 索引 。 
口 ALTER: 用 于 修改 表 的 结构 。 
(2) 数据 操纵 命令 
口 SELECT: 在 数据 库 表格 中 查找 满足 条 件 的 记录 。 
口 INSERT: 在 数据 库 表格 中 插入 新 的 记录 。 
口 UPDATE: 修改 数据 库 表格 中 的 记录 。 
口 DELETE: 删除 数据 库 表 格 中 的 记录 。 
(3) 命令 子 句 
命令 子 句 用 来 指定 查询 条 件 、 数 据 的 来 源 、 数 据 的 组 织 排列 方式 等 , 常用 的 命令 子 句 如 下 。 
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FROM: 指定 数据 来 源 ， 一 般 为 表格 列表 。 
WHERE: 指定 选择 记录 时 要 满足 的 条 件 。 
GROUP BY: 设置 所 选择 的 记录 进行 分 组 的 方式 。 
口 “ORDER BY: 用 于 指定 记录 按 哪 个 字段 进行 排序 ， 以 及 排序 方式 是 升序 还 是 降序 。 
2. 在 SQL 命令 中 使 用 的 运算 符 与 函数 
在 SQL 命令 中 主要 用 3 种 运算 符 ， 即 算术 运算 符 、 逻 辑 运算 符 和 关系 运算 符 。 
(1) 算术 运算 符 
该 运算 符 包括 加 (+) 、 减 (-) 、 乘 (*) 、 除 (/) 和 取 余 运算 (%) 。 
(2) 逻辑 运算 符 
该 运算 符 包 括 AND、OR 和 NOT 3 种 ， 分 别 代表 录 辑 与 运算 、 罗 辑 或 运算 和 逻辑 取 反 
(3) 关系 运算 符 
除了 一 般 程序 设计 语言 中 常见 的 关系 运算 符 ， 如 > (大 于 ) 、< (小 于 ) 、>=〈 大 于 等 
于 ) 、<= (小 于 等 于 ) 、< 或 != (不 等 于 ) 、= (等 于 ) 外 ， 还 有 如 下 几 个 特殊 的 关系 运 
算 符 。 
口 BETWEEN…AND: 用 于 指定 字段 值 的 范围 。 
口 IN: 指定 字段 的 可 能 取 值 。 
口 LIKE: 在 模式 匹配 中 使 用 ， 实 现 模 糊 查找 。 
SQL 提供 了 丰富 的 函数 ， 在 汇总 查询 部 分 将 介绍 几 个 常用 函数 ， 读 者 若 想 了 解 更 多 的 
函数 ， 可 参见 相关 书籍 。 


口 口 口 


5.1.2 SQL 查询 


查询 是 SQL 语言 的 核心 ， 用 于 表达 SQL 查询 的 SELECT 语句 是 功能 最 强 也 是 最 复杂 
的 SQL 语句 。 该 语句 将 从 指定 的 表 中 检索 出 满足 条 件 的 记录 ,被 检索 出 来 的 记录 形成 一 个 
记录 集合 ， 简 称 为 记录 集 。 

1. 简单 SQL 查询 


SELECT 查询 语句 由 7 个 子 句 构成 ， 其 中 SELECT 和 FROM 子 句 是 必须 要 有 的 , 其 他 
子 句 可 以 根据 需要 任意 选择 。 其 语法 格式 如 下 : 

SELECT [ALLIDISTINCT] < 关系 表 字 段 (表达 式 ) 列 表 |*> 

FROM < 关系 表 名 (别名 ) 列 表 > 

[WHERE 查询 条 件 ] 

[GROUP BY 分 组 要 求 ] 

[HAVING 分 组 搜索 条 件 ] 

[ORDER BY ”排序 要 求 ] 

[INTO < 新 关系 表 名 >] 
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【说 明 】 


口 


口 


口 


口 


口 


口 


SELECT 子 句 : 列 出 查询 的 数据 项 。 这 些 项 可 能 取 自 数据 库 中 表 的 列 ， 也 可 以 是 
SQL 在 执行 查询 时 需要 进行 计算 的 表达 式 , 特别 是 使 用 “*” 时 则 表示 包含 指定 表 
中 所 有 的 列 。 其 中 ，ALL 和 DISTINCT 选项 表示 查询 结果 中 是 否 允 许 有 内 容重 复 
的 行 ， 默认 是 ALL 选项 ， 表 示人 允许 有 内 容重 复 的 行 ，DISTINCT 选项 将 不 含 内 容 
重复 的 行 。 

FROM 子 句 : 列 出 查询 所 涉及 的 数据 表 。 

WHERE 子 句 : 设置 对 表 的 查询 条 件 。 

ORDER BY 子 句 : 确定 查询 结果 按 指定 的 一 列 或 多 列 中 的 数据 进行 排列 。 默 认 是 
不 进行 排序 的 。 

GROUP BY 子 句 : 指定 当前 查询 是 汇总 查询 ， 即 不 是 根据 每 行 产生 一 个 查询 结果 ， 
而 是 对 相似 的 行进 行 分 组 ， 然 后 再 对 每 组 产生 一 个 汇总 查询 结果 。 

HAVING 子 句 : 根据 该 子 句 中 给 出 的 条 件 表达 式 对 GROUP BY 所 得 到 的 分 组 结 
果 进 行 过 滤 ， 从 而 选择 出 满足 条 件 的 组 。 

INTO 子 句 : 确定 是 否 将 查询 出 的 结果 存 入 一 张 新 关 系 表 中 。 


在 网 络 教学 系统 中 ， 设 有 一 个 userTable 表 ， 包 含有 用 户 标识 、 密 码 、 姓 名 、 班 级 名 、 
性 别 等 字段 ， 其 中 用 户 标识 为 关键 词 字段 ， 具 有 唯一 性 。 以 下 为 使 用 SELECT 查询 语句 的 


若干 示例 。 


FI 


的 SQL 语句 用 于 查询 userTable 表 中 所 有 用 户 的 姓名 、 性 别 。 


SELECT 姓名 ,性 别 FROM userTable 


FI 


的 SQL 语句 可 列 出 userTable 表 中 所 包含 的 班级 名 称 。 


SELECT DISTINCT 班级 名 FROM userTable 


【说 明 】 相 同 的 班级 只 出 现 一 次 。 


2. 


特殊 查询 处 理 


SQL 提供 了 丰富 的 查询 搜索 条 件 ， 使 用 户 能 够 方便 地 选取 数据 。 


| 


) 模糊 匹配 查找 


模糊 匹配 查找 用 于 检验 一 个 包含 字符 串 数据 的 列 的 值 是 否 匹 配 一 指定 的 模式 。 通 常 使 


用 “00” 
和 任何 


和 “_” 两 个 通配符 ，“9%6” 可 以 和 零 个 或 任意 长 度 的 字符 串 相 匹配 ; “_” 可 以 
字符 串 相 匹配 。 模 糊 匹 配 查找 的 语法 格式 如 下 


[NOT] LIKE 模式 
下 面 的 SQL 语句 用 于 查询 “ 单 选 题 ” 表 格 的 content 字段 中 含有 Java 的 所 有 试题 。 


SELECT “FROM 单 选 题 WHERE content LIKE "%Java%" 


《和 


) 多 表 查 询 处 理 


SELECT 允许 将 多 张 关系 表 的 数据 联系 在 一 起 进行 搜索 查询 。 在 SQL 中 进行 多 表 查 询 
时 ， 查 询 表 中 的 关键 字 通 过 关联 与 另 一 个 表 中 代表 相同 信息 的 字段 建立 联系 ， 从 而 将 要 查 


询 的 
表 查 
束 ， 
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多 张 表 逻辑 上 连接 成 为 一 张大 表 ， 再 对 所 产生 的 大 表 进 行 与 单 表 查 询 类 似 的 处 理 。 多 
询 时 ， 如 果 某 个 字段 在 多 个 表 中 出 现 过 ， 则 要 在 字段 名 通过 句点 分 隔 加 上 所 属 表 的 约 
如 userTable username 表示 username 字段 来 自 userTable 表 。 

例如 ， 网 上 作业 子 系统 用 来 实现 网 络 作业 的 布置 与 学 生 解答 ， 需 要 进行 多 表 设 计 ， 包 


括 作 业 布 置 表 (task) 和 作业 解答 表 (taskanswer) 。 作 业 布 置 表 包 括 作 业 编 号 、 标 题 、 内 
容 、 涉 及 班级 等 字段 ， 作 业 解 答 表 包括 作业 编号 、 学 生 标 识 、 解 答 等 字段 。 这 两 个 表 通 过 
“作业 编号 ”字段 建立 联系 。 


假设 要 查询 “学 生 标识 ”为 jsj0810 的 学 生 对 “作业 编号 ”为 101 的 作业 的 解答 信息 ， 


则 可 用 如 下 SQL 语句 表示 : 


SELECT 标题 ,内 容 , 解答 From task, taskanswer 
where task. 作 业 编 号 = taskanswer. 作 业 编 号 
and task. 作 业 编 号 =101 and taskanswer. 学 生 标 识 =jsj0810' 


(3) 组 属 测试 运算 符 


组 属 测试 运算 符 用 于 测试 一 个 表达 式 的 值 是 否 属于 某 一 组 值 。 其 语法 格式 如 下 : 
[NOT] IN( 数 据 列表 ) 


下 面 的 SQL 语句 查询 userTable 表 中 属于 “计算 机 09-1” 和 “计算 机 09-2” 班 的 用 户 。 


SELECT * FROM userTable 
WHERE ”班级 名 IN (' 计 算 机 09-1',' 计 算 机 09-2') 


此 时 ,IN 后 面 的 数据 列表 也 可 以 是 另 一 个 SELECT 语句 的 查询 结果 产生 的 列表 。 例 如 ， 
列 出 所 有 非 历史 班级 的 学 生 。 不 妨 假设 另 有 一 个 “班级 表 ” 存 储 所 有 班级 的 班级 名 ， 其 中 
还 包括 一 个 名 为 “历史 ”的 布尔 型 字段 表示 是 否 为 历史 班级 。 

SELECT * FROM userTable 

WHERE ”班级 名 IN (select 班级 from 班级 表 where 历史 =false) 


【说 明 】“ 历 史 =false” 写 成 “NOT 历史 ”更 常见 。 
(4) 查询 结果 排序 


使 用 ORDER BY 子 名 可 对 查询 结果 进行 排序 。 其 语法 格式 如 下 : 

ORDER BY < 字段 名 或 列 序号 ”ASC/DESC>,…< 字 段 名 或 列 序号 ASC/DESC> 

其 中 ，ASC 代表 升序 ，DESC 代表 降序 。 

下 面 的 SQL 语句 将 列 出 “教材 ” 表 中 的 全 部 教材 ， 并 按 数 量 降序 排列 ， 若 数量 相同 ， 
则 再 按 单价 升序 的 顺序 排列 。 

SELECT * FROM 教材 ORDER BY 数量 DESC, 单价 ASC 


(5) 使 用 范围 测试 运算 符 


BETWEEN…AND 操作 符 用 于 测试 一 个 表达 式 的 值 是 否 在 某 一 个 范围 之 内 。 其 语法 格 
式 如 下 : 

[NOT] BETWEEN 值 较 小 的 表达 式 AND 值 较 大 的 表达 式 

下 面 的 SQL 语句 将 列 出 “教材 ” 表 中 单价 在 30 一 50 元 之 间 的 教材 名 称 、 单 价 、 作 者 、 
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出 版 社 。 


SELECT 教材 名 称 ， 单 价 ,作者 ,出 版 社 FROM 教材 
WHERE 单价 BETWEEN 30 AND 50 
【说 明 】 范 围 测试 运算 符 使 用 不 是 很 广 ， 它 可 以 用 关系 运算 符 替 代 。 例 如 A_ BETWEEN 
B AND C 的 格式 完全 等 价 于 (A>=B)AND(A<=C), 只 是 用 BETWEEN…AND 显得 更 直观 些 。 
(6) 汇总 查询 
汇总 查询 用 于 对 满足 查询 条 件 的 数据 进行 多 种 计算 处 理 ， 并 将 处 理 结果 作为 查询 结果 
输出 。SQL 提供 了 6 种 汇总 处 理 函数 。 
SUMO: 用 于 计算 表 中 某 一 列 的 总 和 。 
AVG0O: 用 于 计算 表 中 某 一 列 的 平均 值 。 
MINO: 用 于 选择 表 中 某 一 列 的 最 小 值 。 
MAX(): 用 于 选择 表 中 某 一 列 的 最 大 值 。 
COUNTO: 用 于 计算 表 中 某 一 列 中 值 的 个 数 。 
COUNT(*): 用 于 计算 某 张 表 的 行 数 。 
由 于 上 述 6 个 函数 均 是 对 表 中 的 某 一 列 进行 计算 处 理 ， 因 此 它们 也 称 为 列 函 数 ， 这 些 
函数 的 参数 均 是 表 中 的 列 名 。 
下 面 的 SQL 语句 查询 “教材 ” 表 中 全 部 教材 的 数量 及 平均 单价 。 
SELECT SUM( 数 量 ) AS ' 总 数量 ', AVG( 单 价 ) AS “平均 单价 ” FROM 教材 


其 中 ，AS 子 句 用 于 为 汇总 统计 结果 的 列 命名 。 
下 面 的 SQL 语句 查询 userTable 表 中 的 用 户 总 数 。 
SELECT COUNT(*) AS ' 用 户 总 数 ' FROM userTable 


【说 明 】 在 进行 数据 表 中 行 的 计数 时 ， 通 常用 COUNT(*)。 

(7) 分 组 查询 处 理 

分 组 查询 对 查 出 的 数据 按 某 些 指 定 字段 的 值 进行 分 类 ， 并 将 查询 结果 按 行 组 的 形式 输 
出 。 同 一 行 组 中 ， 所 指定 字段 的 值 相同 ， 而 不 同行 组 中 相应 字段 的 值 不 同 。SELECT 语句 
中 的 GROUP BY 子 句 指定 分 组 查询 用 到 的 字段 。 

下 面 的 SQL 语句 查询 userTable 表 中 每 班 的 人 数 。 


SELECT 班级 名 ,COUNT( 班 级 名 ) AS “' 人 数 ' 
FROM userTable GROUP BY 班级 名 


【说 明 】 如 果 SQL 的 列 函数 和 GROUP BY 子 句 连用 ， 则 表示 SQL 将 查询 出 的 结果 分 
组 ， 再 用 列 函 数 分 别 作用 于 每 个 行 组 ， 并 对 每 个 组 产生 一 个 计算 结果 。 

分 组 查询 中 有 一 个 HAVING 子 句 用 于 指定 对 分 组 进行 搜索 的 条 件 , 以 查 出 满足 一 定 要 
求 的 行 组 。HAVING 子 句 的 语法 格式 与 WHERE 子 句 类 似 ， 但 发 生 作 用 的 时 间 点 不 同 ， 
WHERE 子 句 是 在 分 组 之 前 检查 有 哪些 记录 有 资格 参加 分 组 统计 ， 而 HAVING 子 句 是 对 分 
组 统计 后 的 结果 再 次 进行 筛选 ， 从 而 形成 最 后 的 结果 记录 集 。 
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下 面 的 SQL 语句 查询 userTable 表 中 人 数 少 于 20 的 班级 。 


SELECT 班级 名 ,COUNT( 班 级 名 ) AS ' 人 数 ' FROM userTable 
GROUP BY 班级 名 
HAVING ”COUNT( 班 级 名 )<20 


5.1.3 其 他 SQL 语句 


1. 表 结构 维护 
(1) 表 的 创建 


CREATE TABLE + 


语句 用 于 创建 新 表格 ， 其 语法 格式 如 下 : 


CREATE TABLE 表 名 称 (字段 名 称 ltype, 字段 名 称 2 type,…) 
其 中 ，type 规定 了 列 的 数据 类 型 。 不 同 数据 库 的 数据 类 型 表示 有 一 定 的 差异 ， 表 5-1 
列 出 了 SQL Server 数据 库 中 常用 数据 类 型 的 存储 及 取 值 特点 。 


表 5-1 SQL Server 数据 库 中 常用 数据 类 型 的 存储 及 取 值 特点 


数据 类 型 存储 占 字 节 数 描述 

tinyint 1 字 节 整数 ， 取 值 范围 为 0 一 255 

smallint 2 字 节 整数 ， 取 值 范围 为 -32768 一 32767 

int 4 字 节 整数 ， 取 值 范围 为 -23 一 231-1 

bigint 8 字 节 整数 ， 取 值 范围 为 -22 一 29-1 

decimal (ps) | 17 字 节 固定 精度 和 小 数位 数 的 数值 数据 类 型 。p 参数 规定 最 多 可 存储 的 

numeric (p,s, 十 进 制 数 字 的 总 位 数 ，s 参数 规定 小 数 点 后 的 最 大 位 数 

Teal 4 字 节 实数 ， 取 值 范围 为 -3.40E+38 一 3.40E+38 

float(hn) 4 或 8 字 节 存储 1 一 53 的 可 变 精度 的 浮 点 值 ， 参 数 n 代表 精度 值 。n 为 1 一 24 
时 ， 占 用 4 字 节 存储 空间 ; n 为 25~53 时 ， 占 用 8 字 全 和 E 间 

i 占 size 个 字 区 固定 长 度 的 字符 串 〈 可 容纳 字母 、 数 字 以 及 特殊 字符 ) 。 
规定 字符 串 的 长 度 

varehar(size) | 取决 于 实际 字符 数 | 让 全 所 四 二 符 于 全 乓 于、 数 这 以 有 特殊 的 字 特 》。size 

date 3 字 节 存储 日 期 


例如 ， 以 下 SQL 语句 创建 一 个 名 为 Users 的 表 ， 包 含 userid、userName、address、age 


4 个 字段 。 


CREATE TABLE Users (userid int, userName varchar(255), address varchar(255), age int) 


(2) 表 的 删除 
格式 : drop table 表 名 称 


【注意 】 删 除 一 


(3) 表 结构 修改 
口 ”增加 字段 
命令 格式 : Alter table 表 名 称 add column 字段 名 称 栏 类 型 


个 表 时 也 会 将 表 的 结构 及 索引 删除 。 
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口 添加 主键 

命令 格式 ，Alter table 表 名 称 add primary key( 字 段 名 称 ) 
【说 明 】 将 指定 的 字段 定义 为 主键 。 

要 删除 某 主键 ， 可 使 用 如 下 命令 : 

Altertable 表 名 称 drop primary key( 字 段 名称 ) 


(4) 索引 的 创建 与 删除 

口 创建 索引 

命令 格式 : create [unique] index 索引 名 on 表 名 称 (字段 列表 ) 

【说 明 】 按 指定 的 字段 列表 中 的 字段 顺序 建立 索引 ，unique 要 求索 引 字 段 的 值 在 数据 
表 中 不 能 重复 出 现 。 

口 ”删除 索引 

格式 : drop index 索引 名 on 表 名 称 

【 注意】 索引 是 不 可 更 改 的 ， 若 想 对 其 进行 更 改 ， 则 必须 删除 并 重新 创建 。 

2. 数据 更 新 

SQL 是 一 种 完备 的 数据 库 语 言 ， 它 不 仅 可 用 于 数据 库 的 查询 ， 还 可 用 于 数据 库 中 数据 
的 修改 和 更 新 。 与 SELECT 查询 语句 相 比 ， 更 改 数据 库 内 容 的 SQL 语句 显得 较为 简单 。 在 
SQL 中 有 3 条 用 于 数据 更 新 的 语句 ， 即 INSERT、DELETE 和 UPDATE 语句， 分 别 用 于 数 
据 库 数据 的 添加 、 数 据 的 删除 和 数据 的 更 改 操作 。 

(1) 数据 的 添加 

INSERT 语句 用 于 向 一 关系 表 中 添加 一 行 新 数据 。 其 语法 格式 如 下 : 

INSERT INTO 表 名 (字段 名 列表 )VALUES( 字 段 值 列表 ) 

【说 明 】 要 求 字 段 值 列表 中 的 各 数值 顺序 及 数据 类 型 与 字段 名 列表 中 的 各 字段 名 相互 
对 应 ， 否 则 将 会 出 现 操作 错误 的 提示 。 

例如 ， 以 下 SQL 语句 向 userTable 表 中 插入 一 个 新 记录 。 

INSERT INTO userTable VALUES ('jsj0911'"5423", 张 三 ,计算 机 09-1',' 男 ') 

在 向 表 中 插入 记录 时 ， 可 以 只 列 出 部 分 字段 名 , 例如， 以 下 命令 向 userTable 表 中 插入 
一 个 新 记录 。 

INSERT INTO userTable( 用 户 标识 ,密码 ,姓名 )VALUES('guest,'123',' 来 宾 ') 

【 注意】 只 要 是 允许 为 室 和 有 默认 值 的 字段 名 都 可 以 省 略 ， 但 不 允许 为 空 的 字段 不 能 
省 略 ， 和 否则 将 出 现 执 行 错 误 。 

(2) 数据 的 删除 

DELETE 语句 用 于 删除 关系 表 中 一 行 或 若干 行 的 操作 。 其 语法 格式 如 下 : 

DELETE FROM 表 名 [WHERE< 搜 索 条 件 >] 

例如 ， 以 下 SQL 语句 从 userTable 表 中 删除 用 户 标 识 以 123 开头 的 记录 。 

DELETE FROM userTable WHERE 用 户 标识 like '123%' 
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(3) 数据 的 修改 

UPDATE 语句 用 于 修改 关系 表 的 选 定 行 中 一 列 或 若干 列 的 值 。 其 语法 格式 如 下 : 
UPDATE 表 名 SET 字段 名 = 表达 式 ,…, 字段 名 = 表达 式 [WHERE< 搜 索 条 件 >] 
以 下 SQL 语句 将 userTable 表 中 “用 户 标 识 ” 为 jsj081 的 密码 改 为 123。 


UPDATE userTable SET 密码 ='123' WHERE 用户 标识 =jsj081 


以 下 SQL 语句 将 “教材 ” 表 中 清华 大 学 出 版 社 的 库存 数量 超过 500 本 的 图 书 单价 降 
低 30%。 


UPDATE 教材 SET Price=Price-Price*0.3 
WHERE 出 版 社 = "清华 大 学 出 版 社 "AND 数量 >500 


5.2 ADO 对 象 模 型 简介 
5.2.1 ADO 内 幕 


ADO (Activex Data Object，ActiveX 数据 对 象 ) 是 微软 提供 的 新 一 代数 据 库存 取 访 问 
技术 , 其 是 在 OLE DB 技术 的 基础 上 实现 的 。 利 用 ADO 对 象 , 通过 ODBC 驱动 程序 或 OLE 
DB 链接 字符 串 , 可 实现 对 任意 数据 库 的 。 存 取 和 访问 -ODBC 是 Open DataBase Connectivity 
的 缩写 ， 称 为 开放 式 数 据 互联 。 有 了 ODBC 驱动 程序 ， 就 可 以 用 同样 的 方法 访问 任何 符合 
ODBC 标准 的 关系 型 数据 库 ADO、OLE DB、ODBC 以 及 各 种 数据 库 的 关系 如 图 5-1 所 示 。 


ADO (Activex Data Object) 


OLE DB 的 ODBC 驱动 程序 OLE DB 的 数据 库 驱 动 程序 


关系 型 数据 库 (如 Access) 


图 5-1 ADO、OLE DB、ODBC 以 及 各 种 数据 库 的 关系 


非 关 系 型 数据 库 其 他 数据 源 〈 如 Excel 表格 ) 


通过 图 5-1 可 以 看 出 , ADO 可 以 通过 ODBC 或 OLE DB 两 种 驱动 程序 与 数据 库 进 行 通 
言 。 从 执行 效率 上 看 ， 采 用 ODBC 的 环节 明显 要 多 于 OLE DB， 因 此 ， 直 接 用 OLE DB 驱 
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动 程序 访问 数据 库 效率 更 高 。 
5.2.2 ADO 对 象 和 数据 集合 


ADO 技术 是 通过 ADO 对 和 象 的 属性 和 方法 来 完成 相应 数据 库 访 问 的 。 ADO 共有 以 下 7 
个 独立 对 象 。 
(1) Connection 对 象 : 用 于 创建 ASP 程序 与 数据 源 之 间 的 连接 。 
(2) Command 对 象 : 用 于 定义 对 数据 源 执行 的 命令 ， 包 括 SQL 命令 、 存 储 过 程 等 。 
(3) Recordset 对 象 : 用 于 封装 查询 的 结果 ， 称 为 结果 集 。 
(4) Field 对 象 : 用 于 表达 一 行 结 果 中 各 子 段 的 类 型 和 值 。 
(5) Error 对 象 : 用 于 检测 和 判断 在 数据 库 操作 中 出 现 的 错误 ， 如 连接 失败 。 
(6) Property 对 象 : 用 于 描述 ADO 对 象 的 动态 特性 。 
(7) Parameter 对 象 : 用 于 描述 Command 对 象 的 参数 。 

ADO 包含 4 个 数据 集合 : Fields 集合 是 与 一 个 Recordset 对 象 关 联 的 所 有 Field 对 象 的 
集合 ，Parameters 集合 是 与 一 个 Command 对 象 关联 的 所 有 Parameter 对 象 的 集合 ; Errors 
集合 包含 一 个 连接 上 所 产生 错误 的 所 有 Error 对 象 的 集合 ，Properties 集合 是 所 有 Property 
对 象 的 集合 ， 该 集合 与 Connection、Command、Recordset 等 对 象 关 联 。 


ADO 对 象 与 数据 集合 之 间 的 关系 如 图 5-2 所 示 。 
ActiveConnect 属性 

的 本 es 

一 ~~、、 Execute| 方 法 


\ Execute 方法 -一 
\ wi 
ActiveConnect 属性 SS 
Field 对 象 


Fields 集合 


Error 对 象 


了 Parameters 集合 


图 5-2 ADO 对 象 与 数据 集合 之 间 的 关系 
5.3 ”用 Connection 对 象 连接 数据 库 


ASP 程序 要 对 数据 库 进 行 操作 ， 首 先 要 与 数据 库 建 立 连接 。Connection 对 象 不 仅 可 以 
实现 数据 库 的 连接 , 而 且 还 可 以 通过 执行 SQL 语句 对 所 连接 的 数据 库 进 行 各 种 各 样 的 操作 。 
使 用 Connection 对 象 ， 应 用 如 下 方法 创建 对 象 实例 ; 


<% Set conn = Server.CreateObject("ADODB.Connection") %> 
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5.3.1 Connection 对 象 的 常用 属性 和 方法 


1.Connection 对 和 象 的 方法 

(1) Open 方法 : 用 于 建立 到 数据 库 的 物理 连接 。 

(2) Execute 方法 : 用 于 执行 指定 的 查询 、SQL 语句 、 存 储 过 程 或 特定 提供 者 的 文本 。 

(3) Close 方法 : 关闭 Connection 对 象 以 便 释 放 所 有 关联 的 系统 资源 。 需 要 说 明 的 是 ， 
关闭 对 象 并 非 将 它 从 内 存 中 删除 ， 此 时 可 以 更 改 它 的 属性 设置 并 在 以 后 再 次 使 用 Open 方 
法 时 打开 它 。 若 想 将 对 象 完 全 从 内 存 中 删除 ， 可 以 将 对 象 变量 设置 为 nothing。 

2. Connection 对 象 的 常用 属性 


(1) Provider 属性 
Provider 属性 用 于 指定 OLE DB 提供 者 ， 即 数据 访问 驱动 程序 的 名 称 ， 默 认 值 是 
MSDASQL (Microsoft OLE DB Provider for ODBC) 。 如 果 ConnectionString 中 未 指定 OLE 
DB 提供 者 的 名 称 ， 则 使 用 Provider 属性 指定 的 名 称 。 
例如 ， 以 下 使 用 OLE DB 连接 Access 数据 库 。 
<% 
Set conn = Server.CreateObject("ADODB.Connection") 
Conn.Provider= "Microsoft.Jet.OLEDB.4.0" 
Conn.Open Server.MapPath("user.mdb") 
%> 
(2) ConnectionString 属性 
该 属性 包含 用 于 建立 连接 数据 源 的 信息 。 例 如 ， 用 ASP 访问 Access 数据 库 时 ， 可 以 
在 连接 字符 串 中 包含 DRIVER 和 DBQ 两 个 参数 ， 分 别 指定 所 用 的 数据 库 驱 动 程序 和 要 连 
接 的 Access 数据 库 文件 的 路 径 。 例 如 : 
<% conn.ConnectionString = "DRIVER = {Microsoft Access Driver (*.mdb)};DBQ = ci\test.mdb" %> 


(3) ConnectionTimeout 属性 
该 属性 用 于 设置 建立 数据 库 连接 期 间 的 等 待 时 间 ， 其 为 长 整 型 值 (单位 为 秒 ) ， 默 认 
值 为 15。 
(4) Mode 属性 
该 属性 用 于 设置 或 返回 当前 连接 上 提供 者 正在 使 用 的 对 数据 源 的 访问 权限 。 其 属性 值 是 系 
统 定 义 的 一 些 常量 ， 只 能 在 关闭 Connection 对 象 时 才能 设置 。Mode 属性 取 值 如 表 5-2 所 示 。 


表 5-2 Connection 对 象 的 Mode 属性 取 值 


常 量 说 ”有明 
AdModelUnknown 默认 值 ， 表 明 权限 未 设置 
AdModelRead 表明 权限 为 只 读 
AdModelWrite 表明 权限 为 只 写 
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续 表 
常 量 说 有 明 
AdModelReadWrite 表明 权限 为 读 / 写 
AdModelShareDenyRead 防止 其 他 用 户 使 用 读 权限 打开 连接 
AdModelShareDenyWrite 防止 其 他 用 户 使 用 写 权 限 打开 连接 
AdModelShareExclusive 以 独占 方式 连接 数据 源 
AdModelShareDenyNone 防止 其 他 用 户 使 用 任何 权限 打开 连接 


(5) State 属性 
该 属性 用 于 检查 连接 是 处 于 打开 状态 〈 值 为 1) 还 是 处 于 关闭 状态 〈 值 为 0) 。 


5.3.2 ”连接 数据 库 


使 用 Connection 对 象 的 Open 方法 实现 与 数据 库 的 连接 。 其 语法 格式 如 下 : 
Open ConnectionString , UserID , Password , Options 
其 中 : 
ConnectionString 为 包含 连接 信息 的 字符 串 。 
UserID 为 可 选项 ， 用 于 指定 建立 连接 时 所 使 用 的 数据 库 的 用 户 名 。 
Password 为 可 选项 ， 用 于 指定 建立 连接 时 所 使 用 的 数据 库 的 用 户 密码 。 
Options 为 可 选项 ， 用 于 指定 打开 连接 的 方式 是 同步 还 是 异步 。 默认 是 同步 打开 连 
接 ， 当 该 选项 的 值 为 adAsyncConnect 时 ， 代 表 异 步 连接 。 异 步 连接 不 必 等 Open 
方法 执行 完成 就 立即 返回 执行 下 一 条 语句 。 通 常 不 使 用 该 选项 。 
以 下 将 结合 Access 数据 库 和 SQL Server 数据 库 介 绍 具体 的 连接 方法 。 
1. 利用 ODBC 连接 数据 库 
用 ODBC 连接 数据 库 有 使 用 ODBC 数据 源 和 使 用 ODBC 连接 字符 串 两 种 形式 。 
(1) 利用 ODBC 数据 源 连 接 数据 库 
对 于 在 “ODBC 数据 源 管理 器 ”设置 过 的 数据 源 ， 可 以 简单 地 使 用 如 下 格式 建立 连接 。 
conn.open "数据 源 名 称 " 
这 里 ， 数 据 源 为 ODBC 系统 数据 源 。 数 据 库 可 以 是 任何 支持 ODBC 连接 的 数据 库 。 
另外 ， 也 可 以 使 用 “DSN= 数 据 源 名 称 ” 的 格式 进行 详细 指定 ， 并 可 根据 具体 数据 库 类 
型 省 略 后 面 的 若干 参数 。 例 如 : 
conn.open "DSN=test;UID=sa;PWD=;Database=student" 


(2) 利用 ODBC 连接 字符 串 连 接 数 据 库 
对 于 没有 在 “ODBC 数据 源 管理 器 ”设置 过 的 数据 源 ， 可 以 在 连接 字符 串 中 直接 指定 
数据 库 的 ODBC 专用 驱动 程序 。 
Q@ 利用 ODBC 连接 字符 串 连接 Access 数据 库 
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<% 

Set conn=Server.CreateObject("ADODB.Connection") 
DBPath=Server.MapPath("student.mdb") 

conn.Open "Driver={Microsoft Access Driver (*.mdb)};:DBQ="&DBPath 
%> 


其 中 ， 连 接 串 中 各 个 参数 必须 使 用 分 隔 符 “:” (分 号 ) 分 开 。Driver 参数 用 来 指定 所 
要 连接 数据 库 的 驱动 程序 ， 并 且 必 须 和 指定 的 数据 库 为 同一 类 型 ， 该 参数 的 设 定 需 使 用 {} 
括 住 .DBQ 参数 用 来 设置 要 连接 到 的 数据 库 的 实际 路 径 文 件 名 称 。 为 了 考虑 应 用 的 通用 性 ， 
经 常 将 数据 库 文件 与 ASP 程序 文件 放 在 同一 目录 或 某 个 相对 子 目 录 下 。Server.MapPath 将 
以 ASP 文件 的 目录 路 径 为 基础 , 获得 要 访问 数据 库 文件 的 物理 路 径 。 这 里 , 数据 库 student. 
mdb 与 asp 脚本 代码 在 同一 目录 下 ， 和 否则 ， 在 MapPath 的 参数 中 要 指定 相对 路 径 。 

【注意 】{Microsoft Access Driver (*.mdb)} 语 句 中 的 Microsoft、Access、Driver 以 及 

(*.mdb) 之 间 均 只 能 有 一 个 空格 。 

@ 利用 ODBC 连接 字符 串 连 接 SQL Server 数据 库 

以 下 设置 Connection 对 象 的 连接 字符 串 ， 然 后 用 Open 方法 连接 SQL Server 数据 库 。 

conn.ConnectionString = "DRIVER={SQL Server}; Server=localhost'”& 


" UID=sa;PWD=password;DATABASE=student" 
conn.Open 


其 中 , DRIVER 参数 指定 所 用 的 ODBC 驱动 程序 , Server 指定 服务 器 名 称 , UID 和 PWD 
给 出 登录 SQL Server 数据 库 服务 器 的 用 户 名 和 密码 ，DATABASE 指定 要 连接 的 数据 库 。 
【应 用 提示 】 使 用 ODBC 连接 字符 串 的 优点 是 不 用 设置 ODBC， 系 统 使 用 配置 可 简化 ， 
但 其 缺点 是 代码 中 会 暴露 数据 库 的 详细 信息 ， 如 果 被 非法 用 户 获 取 ， 则 会 给 数据 库 的 安全 
带 来 隐患 。 
2. 利用 OLE DB 连接 数据 库 
OLE DB 是 微软 用 来 蔡 代 ODBC 的 一 种 数据 库 访 问 技术 。 它 对 关系 型 数据 库 和 非 关 系 
型 数据 库 均 适用 。 以 下 分 别 给 出 用 OLE DB 连接 Access 数据 库 和 SQL Server 数据 库 的 实例 。 
(1) 用 OLE DB 连接 Access 数据 库 
strconn = "provider=microsoftjet.oledb.4.0;data source=" & server.MapPath("/database/ 教 学 管理 . 


mdb") 
conn.open strconn 


其 中 
口 “provider 指定 用 于 连接 的 提供 者 的 名 称 ，Access 使 用 Microsoft.Jet.OLEDB.4.0。 


口 ” data source 指定 Access 数据 库 的 物理 位 置 。 
(2) 用 OLE DB 连接 SQL Server 数据 库 


set Conn=Server.CreateObject("ADODB.Connection") 
Strcnn="Provider=sqloledb;User ID=sa;Password=1234;Initial Catalog=student;Data Source=PC1" 
Conn.open Strenn 


。92 。 Web 编程 实践 教程 


其 中 : 

Provider 指定 的 是 采用 何 种 数据 库 引 擎 。 此 处 指定 sqloledb 说 明 用 OLE DB 连接 
SQL Server 数据 库 。 

UserID 指定 的 是 访问 SQL Server 的 用 户 名 。 

Password 指定 User ID 指定 的 用 户 访问 密码 。 

Initial Catalog 指定 要 访问 的 数据 库 名 称 。 

Data Source 指定 要 访问 的 SQL Server 服务 器 的 计算 机 名 ， 此 处 指定 计算 机 名 为 
PC1， 也 可 以 将 其 值 设置 为 下地 址 。 


口 


OO 


5.3.3 用 Connection 对 象 执 行 SQL 语句 


利用 Connection 对 象 的 Execute 方 法 执行 SQL 语句 实现 对 数据 库 表 格 的 各 类 访问 处 理 。 

Execute 方法 的 调用 分 为 有 括号 和 无 括号 两 种 形式 ， 前 者 用 于 有 记录 集 返 回 的 SQL 语 
名 《如 select 语句 ) ， 后 者 则 执行 一 个 无 返回 结果 的 SQL 命令 〈 如 insert 语句 ) 。 

1. 执行 select 语句 返回 记录 集 对 象 

格式 : Set rs = Conn.Execute(sq]) 

其 中 ，sql 字符 串 为 一 个 select 查询 语句 。 

2. 无 记录 集 返 回 的 命令 执行 (如 insert、update、delete 等 SQL 命令 ) 

格式 : Conn.execute"SQL 操作 性 语句 "[,RecordAffected][,Option] 


其 中 : 
口 CommandText 是 一 个 字符 串 , 包含 要 执行 的 SQL 语句 、 表 名 、 存 储 过 程 或 特定 提 
供 程序 的 文本 。 


口 、RecordAffected 为 长 整 型 变量 ， 返 回 操作 所 影响 的 记录 数目 。 
口 “Option 指定 CommandText 字符 串 的 命令 类 型 ， 常 用 取 值 及 含义 如 表 5-3 所 示 。 


表 5-3 ”Option 选项 的 取 值 


adCmdText 表明 CommandText 包含 一 个 命令 文本 定义 
adCmdTable 表明 CommandText 为 一 个 表 的 名 字 
adCmdStoredProc 表明 CommandText 为 一 个 存储 过 程 名 


指示 CommandText 参数 中 的 命令 类 型 为 未 知 〈 默 认 ) 


adCmdUnknown 


【 例 5-1】 用 户 注 册 处 理 程序 
程序 1: 注册 填写 程序 
表单 部 分 程序 的 主要 代码 如 下 : 
ee -ex5-1.htm: -一 一 一-- 一 RE 


<form action="wishuserprocess.asp" method="post"> 
<TABLE border="1" cellspacing="0" cellpadding="0" id="table1" style="width: 336px" bgcolor= 
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"#F5FEFE"> 
<TR><TD align=center width="82%" bgColor=#C5FCFS colspan="2" height=28> 
<p align="left> <img border="0" src="images/icon readmore.gif” width="15" height="12"> 

<font color="#008080"> 注 册 用 户 请 真实 填写 以 下 内 容 ， 以 便 联系 </font></TD></TR> 

<TR><TD align="|left" width="33%" ><font color="#000000">&nbsp;&nbsp; 
用 户 名 </font><b><font color="#FF0000"> * </font></b> </TD> 

<TD align=left width="62%" valign="top"> 

<input name="no" type="text" size="20"></TD> </TR> 

<TR> <TD align="left" width="33%” ><font color="#000000">&nbsp;&nbsp; 
密 码 </font><b><font color="#FF0000">*</font></b></TD> 

<TD align=left width="62%" valign="top"> 

<INPUT name="password" type="password" size="21"> 

</TD> </TR> 

<TR> <TD align="left" width="33%" ><font color="#000000">&nbsp;&nbsp; 
确认 密码 </font><font color="#FF0000">*</font></TD> 

<TD align=left width="62%"> 

<INPUT name="confirm" type="password" size="21"> 

</TD> </TR> 

<tr><TD align="left" width="33%" ><font color="#000000">&nbsp;&nbsp; 
姓 名 </font><b><font color="#FF0000">*</font></b></TD> 

<TD align=left width="62%"> 

<INPUT type="text" size="20" name="user" > 

</TD> </tr> 


</TABLE> 
<p align="center"><br><INPUT type="submit" class=button value=" 注 册 "> </p> 
</form> 


【说 明 】 该 程序 提供 了 一 个 注册 表单 填写 页 面 ， 通 过 表格 可 实现 输入 提示 及 表单 各 个 
输入 域 的 排列 定位 。 如 图 5-3 所 示 为 新 用 户 注册 界面 。 


图 5-3 新 用 户 注册 界面 


程序 2: 注册 处 理 程序 


和 一 -WiSshuserprocess.asp--- 一 一 -一 一 一- 一 -一 -一 -一 一- 一 -一 -一 -一 一- 
<% 

file="data.mdb" 

str="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 

Set Conn=Server.CreateObject("ADODB.connection") 
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Conn.Open str 
sql="select * from passwd where userid="&Request.Form("no")&"™" 
set rs=conn.execute(sql) 
ifnotrs.eof then %> 
<center><br><br><font size=5> 该 用 户 已 注册 ! </font></center> 
Else 
sql="insert into passwd values("&trim(request("no"))&"," 
&request("password")&","&request("user")&","&request("address") 
&","&request("email")&",dateValue("&date()&"))" 
conn.execute(sql) 
%> 
<center><br><br><br> <font size=5> 注册 成 功 ! </font></center> 
<%end if%> 


【说 明 】 首 先 执行 查询 语句 检查 用 户 是 否 已 注册 ， 如 果 账 户 已 注册 ， 则 输出 提示 。 对 
于 未 注册 用 户 ， 则 通过 执行 insert 语句 将 新 用 户 写 入 数据 库 表格 。 使 用 & 运 算 符 进行 SQL 
字符 串 的 拼接 ， 要 特别 注意 使 SQL 串 中 数据 的 类 型 与 数据 库 表 格 的 字段 类 型 保持 一 致 。 在 
串 的 拼接 中 注意 单 引号 和 双 引 号 的 使 用 ， 双 引号 表示 VBScript 字符 串 的 开始 与 结束 ， 而 单 
引号 是 SQL 命令 中 字符 串 数 据 的 定 界 符 。 另 外 还 应 注意 ， 日 期 型 数据 是 利用 SQL 命令 的 
dateValue 函数 转换 实现 的 。 

【注意 】 对 Access 数据 库 的 写 入 还 涉及 权限 问题 ， 要 保证 数据 库 所 在 目录 和 数据 库 文 
件 对 IIS 的 匿名 账户 是 可 写 的 。 


5.3.4 ”Connection 对 象 的 数据 集合 


Connection 对 象 有 Errors 和 Properties 两 个 数据 集合 , 前 者 表示 Connection 对 象 运行 时 
最 近 一 次 出 现 的 错误 信息 ， 后 者 表示 Connection 对 象 的 相关 属性 的 集合 。 


1. Error 对 象 与 Errors 数据 集合 


(1) Error 对 象 
每 个 Error 对 象 代 表 了 特定 数据 提供 的 错误 , 利用 其 属性 可 以 得 到 错误 的 相关 信息 ,如 
Number 为 错误 编号 ，Description 为 错误 描述 等 。 
(2) Errors 数据 集合 
Errors 数据 集合 是 当前 连接 进行 数据 访问 操作 所 发 生 的 所 有 错误 的 集合 , Errors 的 属性 
和 方法 如 下 。 
口 、Count 属性 : 集合 中 所 包含 的 Error 对 象 的 个 数 。 
口 ”Clear() 方 法 : 清除 集合 中 的 元 素 。 
口 ItemG) 方 法 : 获取 集合 中 序号 为 i 的 Eror 对 象 。 其 中 ，i 的 取 值 从 0 开始 。 
2. Property 对 象 和 Properties 数据 集合 


ADO 的 各 个 对 象 都 有 很 多 属性 ， 每 个 属性 都 是 一 个 Property 对 象 ， 它 们 拥有 各 自 的 数 
据 类 型 、 名 称 和 值 等 。 为 了 方便 控制 ， 将 同一 ADO 对 象 的 属性 汇集 在 Properties 集合 
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(1) Property 对 象 
Property 对 象 代表 由 数据 提供 者 定义 的 ADO 对 象 的 动态 特性 。ADO 对 象 有 两 种 类 型 
的 属性 ， 即 内 置 属性 和 动态 属性 。 内 置 属性 是 ADO 对 象 的 固有 属性 ， 不 会 作为 Property 
对 象 出 现在 Properties 集合 中 ; 动态 属性 随 程序 的 运行 由 数据 提供 者 定义 ， 将 作为 Property 
对 象 出 现在 Properties 集合 中 , 注意 , 它 只 能 通过 Properties 集合 的 属性 和 方法 引用 .Property 
对 象 的 属性 如 表 5-4 所 示 。 


表 5-4 Property 对 象 的 属性 


属 性 说 明 

Name Property 对 象 的 名 称 

Value Property 对 象 的 值 

Type Property 对 象 的 数据 类 型 。 对 于 Parameter 对 象 ， 该 属性 可 读 写 ， 对 于 其 他 ADO 对 象 ， 
该 属性 只 读 

Attributes Property 对 象 的 特性 码 


(2) Properties 集合 
Properties 集合 对 象 中 包括 了 一 个 ADO 对 象 实例 的 所 有 Property 对 象 ，Properties 集合 
的 属性 和 方法 如 表 5-5 所 示 。 
表 5-5 Properties 集合 的 属性 和 方法 


属性 或 方法 
Count 属性 Properties 集合 中 Property 对 象 的 个 数 


Refresh 方法 刷新 集合 ， 重 新 取得 集合 中 所 有 Property 对 象 
Item 方法 取得 集合 中 某 个 Property 对 象 


【 例 5-2】 访问 connection 实例 的 各 Property 对 象 的 信息 


一 ---eX5-2.asp---- 一 -一 一 -一 -一 
<% 
Set Conn = Server.CreateObject("ADODB.connection") 
Conn.Open "studentscore” ”' 用 ODBC 数据 源 连 接 数 据 库 
Response.Write "<table border=1 ><td > 属性 名 </td><td > 属性 类 型 </td>" 
Response.Write "<td > 属性 值 </td><td > 特性 </td>" 
for each prop in Conn.Properties 

Response.Write "<tr><td>" & prop.name &"</td>" 

Response.Write "<td>" & prop.type &"</td>" 

Response.Write "<td>" & prop.value &"</td>" 

Response.Write "<td>" & prop.attributes &"</td></tr>" 
next 
%> 


5.3.5 ”Connection 对 象 的 事务 处 理 


事务 是 指 一 组 相关 操作 要 么 全 部 成 功 ， 要 么 全 部 取消 。Connection 对 象 的 一 个 重要 功 
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能 是 执行 并 控制 数据 源 的 事务 操作 。 例 如 ， 在 网 上 教学 系统 中 ， 需 要 根据 班级 学 生 名 单 批 
量 建立 账户 ， 这 里 需要 给 每 个 账户 指定 一 个 登录 名 ， 可 以 全 班 统 一 用 相同 前 级 并 在 后 面 加 
学 生 序号 来 代表 登录 名 ， 但 在 添加 用 户 的 操作 过 程 中 可 能 有 某 个 账户 已 被 注册 过 ， 则 说 明 
该 班 的 账户 前 级 选 得 不 合适 ， 整 个 添加 操作 全 部 取消 。 

1. 事务 处 理 方法 

事务 处 理 包含 以 下 3 个 方法 。 

(1) BeginTrans 方法 : 标识 事务 的 开始 。 

(2) CommitTrans 方法 : 事务 提交 。 

(3) RollbackTrans 方法 : 事务 回 滚 。 

使 用 事务 可 以 优化 写 操作 的 过 程 , 从 事务 开始 对 数据 源 的 写 操作 是 在 内 存 缓冲 区 进行 ， 
事务 提交 时 才 把 缓冲 区 内 容 写 入 到 数据 库 。 

2. ASP 的 错误 处 理 

在 编写 事务 处 理 代码 时 ， 常 需要 结合 使 用 ASP 的 错误 处 理 机 制 。ASP 错误 处 理 的 思想 
是 ， 让 程序 遇 到 错误 时 继续 执行 ， 在 特定 的 执行 点 再 通过 Err 类 的 属性 和 方法 来 检查 和 处 
理 错误 。 为 了 让 程序 遇 到 错误 时 继续 执行 ， 在 可 能 出 错 的 代码 之 前 加 上 如 下 语句 : 


On Error Resume Next 


要 判断 是 否 有 错误 发 生 , 可 经 常 使 用 Err 类 的 Number 属性 ， 当 程序 没有 错误 产生 时 其 
值 为 0。Err 类 的 属性 和 方法 如 表 5-6 所 示 。 
表 5-6 Err 类 的 属性 和 方法 
错误 编号 
属性 错误 的 简短 说 明 
错误 的 对 象 源 ， 应 用 程序 的 程序 设计 人 D 
方法 | Raise | 强制 产生 错误 ， 如 Errraise 6 产生 溢出 错误 
清除 错误 ， 用 于 显 式 地 重新 设置 Er 
【 例 5-3】 错误 处 理 测试 
-EX9-3.9Sp-- 一 2 
<% 


Response.Buffer = True 

On Error Resume Next 

x=5/0 

If Err.Number <> 0 Then %> 


错误 Number: <%= Err.Number %><BR> 


错误 信息 : 
出 错 文件 : 
<%End If%> 
访问 运行 程序 将 产生 如 下 输出 : 


省 误 Number: 11 


<%= Err.Description %><BR> 
<%= Err.Source %><BR> 
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错误 信息 : 被 零 除 
出 错 文件 : Microsoff VBScript 运行 时 错误 


5.4 用 Recordset 对 象 访 问 数 据 库 


Recordset 对 象 是 ADO 对 象 中 使 用 最 灵活 、 功 能 最 强大 的 对 象 ， 利 用 该 对 象 几乎 可 以 
完成 对 数据 库 的 所 有 访问 处 理 操作 。Recordset 对 象 表示 的 是 来 自 基 本 表 或 命令 执行 结果 的 
记录 集合 。 该 集合 就 像 一 个 二 维 数组 ， 数 组 的 每 一 行 代表 一 条 记录 ， 而 每 一 列 代表 数据 库 
表格 的 字段 ， 并 用 记录 指针 指示 当前 的 那 条 记录 。 


5.4.1 Recordset 对 象 的 创建 


- 般 来 说 ， 有 两 种 方法 创建 记录 集 对 象 实例 。 
(1) 利用 Connection 或 Command 对 象 的 Execute 方法 从 一 个 数据 库 返 回 结果 时 将 自 
动 创建 一 个 记录 集 对 象 实例 。 
(2 ) 通过 Server.CreateObject("adodb.recordset") 创 建 Recordset 对 象 , 然后 通过 该 对 象 的 
Open 方法 创建 一 个 与 数据 库 表 格 关 联 的 Recordset 对 象 实例 。 例 如 : 
strSQL="select * from student" 


Set rs=Server.CreateObject("adodb.recordset") 
rs.open strSQL,Conn,1,1 


该 方法 所 获得 的 记录 集 具有 更 灵活 的 控制 性 和 更 强 的 功能 。 在 打开 记录 集 之 前 ， 可 以 
详细 设置 记录 集 的 游标 和 锁定 类 型 。Recordset 对 象 的 Open 方法 的 语法 格式 如 下 : 


open usersql,myconn,cursortype,locktype.option 


usersql 代表 SQL 查询 语句 。 
myconn 代表 所 依赖 的 Connection 对 象 的 实例 。 
cursortype 用 于 设置 记录 集 的 游标 类 型 ， 从 而 可 以 决定 对 记录 集 进 行 怎样 的 操作 。 
该 选项 具体 取 值 如 表 5-7 所 示 。 
表 5-7 ”记录 集 的 游标 类 型 

功能 描述 
| 0 | 前 项 游标 ， 默 认 值 。 只 能 向 前 移动 
可 向 前 或 向 后 移动 游标 ， 当 其 他 用 户 删除 或 改变 一 条 记录 后 ， 记 录 集 将 反 
映 出 这 个 变化 ， 若 用 户 添加 新 记录 ， 该 新 记录 将 不 会 出 现在 记录 集中 
可 向 前 或 向 后 移动 游标 ， 其 他 用 户 的 任何 修改 都 将 在 记录 集中 立即 反映 
出 来 
静态 游标 。 其 他 用 户 的 任何 修改 都 不 在 记录 集中 反映 出 来 ， 服 务 器 响应 
的 数据 与 数据 库 已 经 分 开 


口 口 口 料 
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【注意 】VBScript 中 定义 的 符号 常量 文件 位 于 C:\Program Files\Common Files\System\ 
adovadovbs.inc, 如 果 应 用 中 需要 用 到 其 中 的 常量 , 可 以 将 该 文件 复制 到 ASP 应 用 的 目录 下 ， 
在 需要 用 到 符号 常量 的 程序 前 加 上 如 下 语句 : 


<!-- #include file = "adovbs.inc" --> 


口 Locktype 用 于 设置 对 记录 集 的 锁定 类 型 ， 它 决定 了 多 用 户 试图 同时 修改 一 条 记录 
时 对 记录 应 如 何 处 理 。 该 选项 具体 取 值 如 表 5-8 所 示 。 


表 5-8 记录 集 的 锁定 类 型 


符号 常量 功能 描述 
adLockReadOnl 以 只 读 方式 打开 ， 所 以 不 能 做 任何 更 新 ， 为 默认 值 
adLockPressimistic 悲观 加 锁 ， 在 编辑 修改 记录 时 ， 立 即 锁定 它 
nh 乐观 加 锁 ， 在 编辑 修改 记录 时 ， 并 未 加 锁 ， 只 有 在 调用 记录 集 
adLockOptimistic 


的 Update 方法 更 新 记录 时 ， 才 锁定 记录 


口 “Option 用 于 指定 usersql 参数 项 的 命令 字符 串 的 类 型 。 该 选项 具体 取 值 如 表 5-3 所 示 。 
5.4.2 ”记录 集 游标 及 移动 方法 


对 记录 集 的 访问 是 逐个 记录 进行 的 ， 
每 次 操作 访问 的 记录 称 为 当前 记录 。 所 谓 
记录 集 游 标 就 是 指 当 前 记录 指针 。 通 过 移 
动 游标 可 以 实现 对 整个 记录 集中 各 记录 
的 遍历 访问 。 记 录 之 间 的 前 后 关系 及 记录 
指针 的 移动 方向 关系 如 图 5-4 所 示 。 


1. Move 方 法 
该 方法 将 记录 指针 向 前 或 向 后 移动 图 5-4 记录 指针 移动 方向 示意 图 


指定 的 记录 个 数 。 其 语法 格式 如 下 : 
Move NumRecords, Start 


其 中 : 
口 NumRecords 表示 指针 移动 的 记录 数目 。 当 为 正 数 时 表示 向 后 移动 : 当 为 负数 时 表 
示 向 前 移动 。 


口 Start 表示 指针 移动 的 基准 点 。 该 选项 的 取 值 如 表 5-9 所 示 。 默 认 是 根据 记录 集 的 
Bookmark 〈 书 签 ) 当前 值 进行 相对 移动 。 读 记录 集 的 Bookmark 属性 得 到 的 是 当 
前 记录 位 置 ， 以 下 代码 将 Bookmark 属性 保存 在 一 个 变量 中 ， 以 后 可 以 简单 地 通 
过 设置 Bookmark 属性 的 方法 回 到 该 记录 ， 从 而 实现 指针 的 快速 移动 。 

Mark = rs.Bookmark " 记 住 位 置 


2 "移动 记录 到 别 的 位 置 
rs.Bookmark = Mark "改变 书签 到 以 前 记 住 的 位 置 
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表 5-9 ”指针 移动 的 基准 点 


常量 说 明 
AdBookmarkCurrent 根据 书签 的 当前 值 进行 相对 移动 
AdBookmarkFirst 从 首 记 录 开 始 
AdBookmarkLast 从 尾 记录 开始 


2. MoveFirst、MoveLast、MoveNext 和 MovePrevious 方法 
(1) MoveFirst: 将 记录 指针 移 至 第 一 条 记录 。 
(2) MoveLast: 将 记录 指针 移 至 最 后 一 条 记录 。 如 果 记 录 集 不 允许 使 用 书签 ， 则 该 方 
法 会 产生 错误 。 
(3) MoveNext: 将 记录 指针 移 至 下 一 条 记录 。 如 果 EOF 为 True， 则 该 方法 会 产生 错误 。 
(4) MovePrevious: 将 记录 指针 移 至 上 一 条 记录 。 如 果 BOF 为 Tme， 则 该 方法 会 产生 


漠 误 。 


3， BOF 与 EOF 属性 
(1) BOF 属性 : 车 当前 记录 的 位 置 在 第 一 行 记录 之 前 ， 则 BOF 属性 返回 True， 反 之 
则 返回 False。 
(2) EOF 属性 : 若 当 前 记录 的 位 置 在 最 后 一 行 记录 之 后 ， 则 EOF 属性 返回 True， 反 
之 则 返回 False。 
当 对 记录 集 进行 遍历 访问 时 ， 经 常 要 使 用 BOF 或 EOF 属性 判断 记录 指针 是 否 到 达 记 
录 集 的 边界 位 置 。 如 果 BOF 与 EOF 都 为 True， 则 表示 在 记录 集中 无 任何 记录 。 


5.4.3 ”访问 记录 的 数据 内 容 


-条 记录 的 内 容 是 若干 字段 (Field) 的 数据 构成 的 集合 〈Fields) ， 读 记录 数据 就 是 对 
这 些 字段 的 访问 。 
1，Fields 集合 
Fields 集合 最 常用 的 属性 是 Count， 它 可 以 获得 集合 中 所 包含 的 Field 对 象 的 个 数 ， 也 
Item 方法 是 Fields 集合 的 常用 方法 ,用 于 获得 集合 中 的 某 一 Field 对 象 。 其 语法 格式 如 下 : 
Rs.Fields.item(index) 
其 中 ，index 既 可 以 是 字符 串 形式 的 字段 名 ， 也 可 以 是 一 个 代表 字段 序号 的 值 ， 序 号 从 
0 开始 编号 。 也 就 是 说 ， 对 字段 的 访问 既 可 通过 字段 名 ， 又 可 通过 字段 的 顺序 号 实现 。 例 如 ， 
要 访问 记录 集中 字段 名 为 usemame 的 字段 ， 并 假设 其 序号 为 0， 则 有 如 下 几 种 表达 形式 : 
口 rs("usemame ") 
rs(0) 
rs.Fields("usemame ") 
rs.Fields(0) 


DODO 
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口 rs.Fields.item("username ") 
口 rs.Fields.item(0) 
2. Field 对 象 
每 个 Field 对 象 对 应 记录 集 的 一 个 字段 ( 列 ) ， 其 常用 属性 有 以 下 几 种 。 
口 Name 属性 : 字段 名 。 
Type 属性 : 字段 类 型 。 
Value 属性 : 字段 值 。 
ActualSize 属性 : 字段 的 实际 长 度 。 
DefineSize 属性 : 字段 在 数据 库 中 定义 的 长 度 。 
如 果 访 问 某 字段 不 指定 属性 ， 则 默认 指 访问 字段 的 值 (Value 属性 ) ， 以 下 的 表达 形式 
等 价 : 


rs.Fields.item("username") 
rs.Fields.item("username").value 


访问 字段 的 其 他 属性 要 具体 指定 ， 如 rsGD) name 表示 获取 序号 为 i 的 字段 的 名 称 。 要 将 
记录 集 的 所 有 字段 名 显示 出 来 ， 可 用 如 下 循环 实现 。 


Fork=0 to rs.Fields.count-1 
Response.Write rs(k).name & "," 
Next 


【思考 】 如 何 用 for each…next 循环 输出 Fields 集合 中 的 所 有 字段 名 。 


[| 


5.4.4 ”记录 集 的 分 页 显示 


前 面 介绍 了 如 何 检索 数据 并 输出 到 浏览 器 端 ， 对 少量 数据 而 言 ， 简 单 的 输出 处 理 是 完全 
可 以 的 ， 但 是 若 数据 量 很 大 ， 有 几 百 条 甚至 上 千 条 ， 一 次 将 如 此 多 的 数据 全 部 输出 到 客户 端 
是 不 现实 的 ， 一 是 页 面 从 上 到 下 拉 得 很 长 ， 二 是 客户 端 等 待 的 时 间 过 长 ， 三 是 服务 器 的 负载 
过 大 ， 所 以 应 经 常 采取 分 页 输出 。 与 记录 集 的 分 页 处 理 相关 的 几 个 属性 如 表 5-10 所 示 。 


表 5-10 与 记录 集 的 分 页 处 理 相关 的 几 个 属性 


属 性 功 能 
AbsolutePage 设 定 当前 记录 的 位 置 是 位 于 哪 一 页 ， 以 1 为 起 始 页 
AbsolutePosition 目前 记录 指针 在 Recordset 中 的 位 置 
PageCount Recordset 对 象 包括 多 少 “ 页 ”的 数据 
PageSize Recordset 对 象 每 一 页 显示 的 记录 数 
RecordCount Recordset 对 象 记录 的 总 数 


处 理 步 骤 : 首先 用 PageSize 指定 页 的 大 小 。 在 此 基础 上 ， 用 PageCount 得 到 页 面 的 总 
数 。 通 过 AbsolutePage 属性 定位 到 指定 页 ， 从 而 对 该 页 数据 进行 访问 。 
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【 例 5-4】 网 络 教 学 系统 用 户 留言 的 分 页 查询 
在 网 络 教学 平台 的 首页 安排 了 用 户 留 言 的 超 链接 , 此 时 涉及 了 一 个 guestbook 表格 , 该 


表 的 字段 说 明 如 表 5-11 所 示 。 


表 5-11 guestbook 表 的 字段 说 明 


字 上段 

id 

title 

flag answer 

answer 备注 

time qr 日 期 /时 间 
以 下 是 与 翻 页 处 理 相 关 的 程序 代码 : 
0 --guestbook .asp-- 一 -一 -一 
<% 
strPage = Request.queryString("page") 
file="data.mdb" 


Set objCnn = Server.CreateObject("ADODB.connection ) 
connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 
objCnn.Open connstr 
strSQL = "select * from guestbook order by time_qry desc" 
set rs=server.createobject("adodb.recordset") 
rs.open strSQL,objCnn,1,1 
if rs.RecordCount>0 then 
rs.PageSize = 10 
intPageCount = rs.PageCount 
if Len(strPage) = 0 then strPage = "1" 
if int(strPage)<1 then strPage = "1" 
if int(strPage)>intPageCount then strPage = CStr(intPageCount) 
rs.absolutepage=cint(strpage) 
%> 
<form name="frmSearch" action="guestbook.asp" method="get" > 
<table width="96%" cellpadding="5" cellspacing="0" > 
<tr> 
<td align=left> 
【<a href="input_guestbook.asp"><font color=green> 我 留言 </font></a>】&nbsp;&nbsp;&nbsp; 
[本 页 是 第 <%=int(strPage)%>/<%=intPageCount%> 页 ] 
</td> 
<td align=right> 第 <input id="page" name="page" type="text" style="width: 20px;" value="<%= 
strPage%>" /> 页 
<input type='image' src="images/btn_go.gif > 
<a href="guestbook.asp?page=1"> 第 一 页 </a> 
<a href="guestbook.asp?page=<%=CStr( int(strPage)-1 )%>"> 上 一 页 </a> 
<a href="guestbook.asp?page=<%=CStr( int(strPage)+1 )%>"> 下 一 页 </a> 
<a href="guestbook.asp?page=<%=intPageCount%>"> 最 后 页 </a> 
</td> 
</tr> 
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</table><br> 
<table width="98%" style='table-layout:fixed' > 
<tr bgcolor="#EBFED1" height="25"> 
<td width="5%" align=center><font color="#008000"> 序 号 </font></td> 
<td width="80%" align=center><font color="#008000"> 留 言 内容 和 应 答 </font> 
</td> 
<td width="10%" align=center><font color="#008000"> 留 言 时 间 </font></td> 
</tr> 
<% 
dim flagcolor,classtype 
flagcolor = true 
for num = 1 To rs.PageSize 
if rs.EOF then 
exit for 
end if 
flagcolor = not (flagcolor) 
if (flagcolor) then 
classtype = "tr1" ' 用 不 同 的 样式 交替 显示 各 行 
else 
classtype = "tr2” 
end if 
%> 
<tr class="<%=classtype%>"> 
<td align=center><%=num%></td> 
<td style="word-wrap:break-word "> 
<pre><%lf rs("title")<>"" Then 
Response.Write Server.htmlEncode(rs("title")) 
End if%></pre> 
<% 
if (rs("flag_answer")) then 
Response.Write "<pre><font color=#993399><b> 答 :</b></font>" 
&server.htmlencode(rs("answer"))&"</pre>" 
else 
Response.Write "<font color=#993399><b> 未 回答 </b></font>" 
end if 
%> 
</td> 
<td align="center"><%=rs("time_qry")%> </td> 
</tr> 
<% 
rs.MoveNext 
Next 
objCnn.close 
%> 
</table> 
</form> 
<% end if%> 


运行 结果 如 图 5-5 所 示 。 
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三 三 三 两 有 引 
图 5-5 分 页 查看 用 户 留言 界面 
【说 明 】 本 例 主要 介绍 分 页 显示 查询 的 实现 思想 ， 翻 页 超 链接 和 表单 提交 的 目标 程序 


均 为 同一 个 程序 文件 。 在 这 里 ， 获 取 当 前 页 用 Request.queryString("page")， 所 以 表单 的 提交 
方式 要 使 用 get 方式 。 为 了 让 各 行内 容 更 加 醒目 ， 此 时 使 用 不 同 的 背景 样式 交替 显示 各 行 。 


5.4.5 


淹 


记录 的 添加 与 编辑 修改 


利用 记录 集 提 供 的 一 组 方法 ， 可 以 实现 记录 的 添加 、 更 新 、 删 除 操作 。 
1. AddNew 方法 
该 方法 用 于 向 记录 集中 插入 一 条 新 记录 ， 使 用 本 方法 后 ， 新 插入 的 记录 将 成 为 当前 记 


。 其 语法 格式 如 下 : 


rs.AddNew FieldList, Values 

其 中 : 

口 FieldList:， 可 选 参数 ， 新 记录 中 字段 名 列表 。 

口 “Values: 可 选 参数 ， 与 Field 对 应 的 一 组 字段 值 。 
通常 采用 如 下 形式 插入 新 记录 : 
rs.addnew 

rs(" 字 段 名 1")= 值 1 

rs(" 字 段 名 2")= 值 2 


rs.update 


在 立即 更 新 模式 下 ， 调 用 不 带 参数 的 AddNew 方法 ， 字 段 值 的 更 改 缓存 在 本 地 ， 调 用 


为 字段 赋值 


Update 方法 时 才 将 新 记录 传递 到 数据 库 ， 只 有 这 样 ， 才能 在 进行 多 记录 操作 时 提高 应 用 


性 能 。 


【应 用 实例 】 在 网 络 考试 交卷 时 ， 要 将 学 生 解 答 写 入 数据 库 ， 可 以 使 用 循环 将 所 有 解 


答 添加 到 记录 集中 ， 然 后 在 循环 外 使 用 Update 方法 更 新 数据 。 在 应 用 中 由 于 要 多 次 访问 到 
试题 和 学 生 解 答 ， 所 以 事先 将 数据 存储 在 数组 中 ， 以 提高 性 能 。 
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i=1 

do while i<=amount 'amount 为 试题 数量 
rs.addNew 
rs("xuehao") = username 学生 标识 
rs("tihao") = shiti(i) ' 第 i 道 题 的 试题 编号 
rs("answer") = answer(i) ' 第 i 道 题 的 试题 的 学 生 解 答 
rs("type")= 1 "1 代表 单 选 题 
i=i+1 

loop 

rs.update ' 最 后 一 次 性 更 新 数据 库 表格 


【 例 5-5】 批量 建立 学 生 用 户 

全 班 用 户 的 登录 名 使 用 统一 前 级 ， 批 量 建立 账户 ， 数 据 库 表 中 用 户 登 录 名 的 值 具有 唯 
-性 ， 如 果 出 现 重 名 ， 则 全 班 操作 取消 。 

以 下 处 理 程序 需要 用 到 请 求 页 面 中 表单 提交 的 3 个 域 变 量 。 

口 classname: 班级 名 。 

口 “students: 班级 学 生 名 单 清单 ， 各 学 生 之 间 用 逗号 分 开 。 

口 prefix: 用 户 登录 名 的 前 级 。 


和 -----@X5-5.9SPp-- 一 2 
<% 

"本 程序 演示 ASP 事务 处 理 的 应 用 

on error resume next 

Set Conn=Server.CreateObject("ADODB.connection ) 
Conn.Open request.cookies("connstring") "建立 数据 连接 
Conn.begintrans 事务 开始 

Set rs=Server.CreateObject("ADODB.Recordset ) 
sql="SELECT * FROM usertable " 

rs.open sql ,conn,1,2 "建立 记录 集 
prefix =request("prefix") 

classname=request("classname") 

alluser=request("students") 


user=split(alluser,",") ' 将 学 生 名 单 分 离 存储 在 数组 user 中 

amount=ubound(user)+1 "求学 生 用 户 数量 

for n=1 to amount 
rs.addnew "添加 一 个 记录 
rs("loginid")= prefix &n 第 n 个 学 生 的 登录 名 
rs("password")="111" ' 初 始 密 码 统一 为 111 
rs("username")= user(n-1) ' 第 n 个 学 生 的 姓名 
rs("classname")= classname 

next 

rs.update 更 新 记录 

if Err.Number=0 then "说 明 无 错 产生 
conn.CommitTrans 事务 提交 


response.write "<font color=red> 导 入 成 功 ,祝贺 !</font>" 


else 
conn.RollbackTrans 


事务 回 滚 


Response.Write "<font color=red> 导 入 失败 ， 系 统 已 有 同名 账户 !</font>" 


end 于 
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conn.close 
set conn=nothing 
%> 


【说 明 】 本 例 用 到 了 接 下 来 将 要 介绍 的 记录 和 集 对 象 实现 对 数据 库 表格 的 操作 。 利 用 记 

录 集 的 addNew 方法 添加 一 条 记录 ， 并 通过 “rs(" 字 段 名 ")= 值 ”的 方式 为 字段 赋值 。 循 环 后 
通过 update 方法 实现 操作 更 新 。 程 序 中 利用 字符 串 的 split 方法 将 学 生 名 单 存储 到 数组 中 ， 
以 便 进行 操作 访问 。 在 整个 程序 的 最 后 安排 了 错误 判定 代码 , 通过 Err 类 的 Number 属性 判 
断 是 否 出 现 错误 ， 如果 有 错 ， 则 执行 Connection 对 象 的 RollbackTrans 方法 将 事务 回 深 ; 否 
则 ， 执 行 CommitTrans 方法 实现 事务 提交 。 

2. Delete 方法 

该 方法 用 于 删除 当前 记录 或 一 组 记录 。 其 语法 格式 如 下 : 

rs.Delete AffectRecords 

其 中 ，AffectRecords 为 可 选项 ， 确 定 Delete 方法 所 影响 的 记录 数 日 ， 具 体 常量 定义 如 
表 5-12 所 示 。 


表 5-12 AffectRecords 的 取 值 


常量 说 明 
AdAffectCurrent 默认 。 仅 删除 当前 记录 
AdAffectGroup 删除 满足 当 前 Filt 性 设置 的 记录 。 要 使 用 该 选项 ， 必 须 将 Filter 属性 设 
置 为 有 效 的 预定 义 常量 之 一 
adAffectAll 删除 所 有 记录 


adAffectAllChapters 删除 所 有 子 集 记录 


使 用 立即 更 新 模式 将 在 数据 库 中 进行 立即 删除 ， 和 否则 记录 将 标记 为 从 缓存 删除 ， 实 际 
的 删除 处 理 将 在 调用 Update 方法 时 进行 。 
3. Update 方法 
该 方法 将 Recordset 对 象 的 当前 记录 所 做 的 所 有 更 改 保存 到 数据 库 中 。 其 语法 格式 如 下 : 
rs.Update Fields, Values 
其 中 ， 
口 Fields: 可 选 参数 ， 要 修改 的 字段 名 列表 。 
口 ”Values: 可 选 参数 ， 与 Fields 对 应 的 一 组 字段 值 。 
【 例 5-6】 试题 库 中 单 选 题 的 管理 
单 选 题 的 数据 库 表 格 single_select 的 字段 说 明 如 表 5-13 所 示 。 


表 5-13 single_select 表 的 字段 说 明 


字 段 意 义 
st no 试题 编号 
content 试题 内 容 
answer 标准 答案 
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字 段 类 型 意 义 
difficulty | 数字 | 难度 系数 
point no 文本 所 属 知识 点 


是 序 1: 分 页 查看 试题 


i --View_select.asp- 一 ------------ 一 -一 -- 一 -一 -一 -一 -一 -一 -------- 
<% 
file="data.mdb" 
connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 
Set Conn=Server.CreateObject("ADODB.connection ) 
Conn.Open connstr 
Set rs=Server.CreateObject("ADODB.Recordset ) 
sql="SELECT * FROM single_select " 
rs.open sql,conn ,1,2 
mlngTotalPgs = rs.RecordCount 
if mingTotalPgs<>0 then 
mlngTotalRds = mlngTotalPgs 
mlngTotalPgs = int((mlngTotalPgs+10-1)/10) 
else 
mlngTotalRds = mlngTotalPgs 
end if 
iCurPage=cIng(request("page")) 
if iCurPage<1 then iCurPage=1 
if mingTotalPgs<>0 then 
rs.move (iCurPage-1)*10 
end if %> 
<html> 
<head><title> 试 题 查询 </title> 
<link rel="stylesheet" type="text/css" href="main.css"> 
<script language="javascript"> 
function gotopage(i) { 


frmSearch.page.value =i; // 在 page 框 中 设置 页 码 
frmSearch.submit(); // 提 交 表 单 

b 

</script> 

</head> 

<body><center> 


<form name="frmSearch" action="view_selectasp" method="get" > 

<div align="center" class="title"> 

<font color="#339966"> 单 选 题 管理 </font></div> 

< 上 L- 以 下 表格 显示 当前 页 及 记录 的 信息 以 及 翻动 试题 的 超 链 接 --> 

<table border="1" width="95%" height="208" cellspacing="0" > 

<td height=20 align=left> 共 有 <font color=red><%=mlngTotalRds %></font> 
条 记录 &nbsp;&nbsp; 显 示 第 <font color=red><%=iCurPage%></font> 页 / 共 
<font color=red><%=mlngTotalPgs%></font> 页 

</td> 

<td height=16 align=right> 

<%if iCurPage <= 1 then 
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Response.Write "最 前 页 " 
elseif iCurPage > 1 then 
Response.Write "<a href='javascript:gotopage(1);'>"& "最 前 页 " & "</a>" 
end if 
Response.Write "&nbsp;" 
if iCurPage <= 1 then 
response.write "上 一 页 " 
elseif iCurPage > 1 then 
response.write "<a href='javascript:gotopage("&iCurPage-1&");'>" 
& "上 一 页 " & "</a>" 
end if 
response.write "&nbsp;” 
if iCurPage >= mlngTotalPgs then 
response.write "下 一 页 " 
else 
response.write "<a href='javascript:gotopage("&iCurPage+1&");>" 
& "下 一 页 " & "</a>" 
end if 
response.write "&nbsp;” 
if iCurPage >= mlngTotalPgs then 
response.write "最 后 页 " 
else 
response.write "<a href='javascript: gotopage("&mingTotalPgs&");'>" 
& "最 后 页 " & "</a>" 
end if 
response.write "&nbsp;&nbsp; 转 向 第 <input type=text id="page" style= 
"WIDTH: 30px' value="&iCurPage&" > 页 
<input type='image' src="go.gif” id='image1' ></TD>" 
%> 
<td align="right" width="70"> 
<input type="button" name="button" value=" 添 加 " class="btn" 
onclick="window.location.href='select_insert.asp';"> 
</td> 
</table> 
<% if mingTotalPgs > 0 then %> 
<table width="95%" border="1" style="table-layout:fixed"> 
<!-- ”以 下 显示 试题 内 容 的 表 头 “--> 
<tr height="22" style="background-color: #EBF8CF" valign="bottom" > 
<td width="60%" align="middle" ><font color="#D05411"> 题 目 内 容 </font></td> 
<td width="5%" align="middle" ><font color="#D05411"> 答 案 </font></td> 
<td align="middle" width="5%"><font color="#D05411"> 难 度 </font></td> 
<td width="10%" align="middle" ><font color="#D05411"> 知 识 点 </font></td> 
<td width="10%" align="middle" ><font color="#D05411"> 操 作 </font></td> 
</tr> 
<!-- ”以 下 显示 试题 内 容 的 各 行 ， 每 页 显示 10 条 记录 --> 
<% 
fori=1 to 10 
if rs.Eof then 
exit for 
end if 
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%> 

<tr> 

<td style='word-wrap:break-word > 

<pre><%=server.htmlencode(rs( "content ))%> </pre></td> 

<td align=middle><%=rs("answer )%></td> 

<td align=middle><%=rs("difficulty")%></td> 

<td align=middle><%=rs("point_no")%></td> 

<td align=center ><a href='select_man.asp?num=<%=rs("st_no")%> 
&ACT=EDIT&page=<%= iCurPage %>'> 修 改 </a> 

<font color=green><b>/</b></font> 

<a href='select_man.asp?num=<%=rs("st_no")%>&ACT=DEL 

&page=<%= iCurPage %>' onclick="return confirm(' 确 定 删除 吗 ?'");"> 删 除 </a> 

</td> 

</tr> 

<% rs.movenext 

next 

%> 

</table> 

<% end if %> 

</form> 

</body> 

</html> 


行 结果 如 图 5-6 所 示 。 


0), nev Colme GO) -0 | 伟 改 /日 际 | 划 || 
阿 型 jE 生生 


图 5-6 ”试题 的 分 页 浏览 


【说 明 】 本 例 的 翻 页 处 理 与 例 5-4 的 方法 不 同 ， 程 序 中 国定 页 的 大 小 为 10 条 记录 ， 跳 
转 到 指定 的 页 是 通过 记录 值 的 计算 将 记录 移 到 指定 页 的 开始 。 翻 动 页 是 通过 表单 提交 页 码 
实现 ， 程 序 中 通过 JavaScript 函数 goto 的 执行 在 page 输入 框 中 设置 页 码 ， 然 后 调用 表单 的 
submit() 方 法 提交 表单 ， 表 单 提交 的 目标 页 是 该 页 自身 。 每 行 提供 两 个 超 链接 实现 该 试题 的 
修改 和 删除 操作 。 

【注意 】 程序 中 利用 表格 和 单元 格 的 样式 控制 固定 单元 格 宽度 , 使 显示 内 容 自 动 转行 。 

同时 通过 server.htmlencode 方法 对 显示 内 容 进 行 转换 处 理 ， 以 实现 内 容 的 原样 显示 。 

程序 2: 修改 和 删除 试题 

删除 试题 比较 简单 ， 只 需 根据 URL 参数 提供 的 试题 编号 找到 试题 , 用 SQL 中 的 delete 


命 


新 
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令 删 除 即 可 。 而 修改 则 要 提供 一 个 表单 ， 表 单 中 显示 试题 的 原来 信息 ， 通 过 表单 提交 将 
修改 的 信息 写 入 数据 库 。 


-一 一 -一 一 一 -一 一- 一 -select_man.asp--- 一 -一 -一 -一 -一 

<% 

page=clng(request("page )) 

SAction = request.querystring("ACT") 

file="data.mdb" 

connstr="driver={Microsoft Access Driver (*.mdb)}:dbq="&Server.MapPath(file) 

Set Conn=Server.CreateObject("ADODB.connection ) 

Conn.Open connstr 

strSelNo=request("num") 

if sAction ="DEL" then "试题 删除 处 理 
sql="delete FROM single_select where st_no=" &strSelNo 
Conn.Execute(sql) 


Conn.close 
Response.Redirect("view_select.asp?page="&page) 

end if 

if sAction ="EDIT" then ' 试 题 修 改 代码 


Set ip=Server.CreateObject("ADODB. Recordset") 
Set cmdTemp=Server.CreateObject("ADODB.Command") 
sql="SELECT * FROM single_select where st_no="&strSelNo 
ip.open sql ,conn,1,2 
if request("UPD")=1 then 判断 当前 状态 是 修改 显示 还 是 修改 数据 写 入 
ip("content")=request.form("comment") ' 将 修改 结果 写 入 数据 库 
ip("answer")=Request.Form(" 答 案 ") 
ip("difficulty")=request.form(" 难 度 系 数 ") 
ip("point_no")=request.form("point") 
ip.update 
ip.close 
Response.Redirect("view_select.asp?page="&page) 
else 
strContent=server.htmlencode(ip("content")) “对 试题 内 容 进 行 显 示 并 转换 处 理 
strDiff=ip("difficulty ) 
strAnswer = asc(ip("answer")) 
knowledge = ip("point_no") 
endif 
%> 
<html> 
<head> 
<link rel="stylesheet" type="text/css" href="main.css"> 
</head> 
<body><br> 
<div align="center" class=title> 单 选 题 编 辑 <center><br> 
<form name="frmSearch" action="select_man.asp?ACT=<%=sAction%> 
&UPD=1&num=<%=strSelNo%>" method="POST" onsubmit="return check()"> 
<table border="1" width="95%" height="208" cellspacing="0" > 
<tr><td align="center width="18%" height="95"> 
<font color="#FF0000"> 倒 </font><font color="#0000FF"> 试 题 内 容 
</font><br><font color=teal>( 每 行 结束 请 敲 回 车 )</font> </td> 
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<td align="left" width="80%" height="95" > 

<textarea name="comment" wrap="soft" rows="7" cols="84"> 
<%=strContent%></textarea> </td> 

</tr><tr> 

Pe 难度 的 编辑 显示 省 略 .…… 

<td align="CENTER" width="18%" height="26"> 

<font color="#FF0000"> 倒 </font><font color="#0000FF"> 答 案 </font></font></td> 
<td ALIGN="CENTER" width="80%" height="26" > 

<table width="210" align="left"> 


<% i=65 '65 为 字母 A 的 ASCII 码 值 
do while i<=69 
%> 


<td align="center" width="96"> <%=chr(i)%> </td> 
<td align="center" width="104"> 
<input type="radio" size="30" name=" 答 案 " value="<%=chr(i)%>" 
<%if i=strAnswer then response.write " checked" 
end if%>></td> 
<% 
i=i+1 
loop 
%> 
</tr> 
</table></td> 
</tr> <tr> 
es 知识 点 的 显示 与 输入 省 略 .…… 
</table> 
<p><br> 
<input type="submit" name="b1" value=" 确 ” 定 " class=btn> 
<input type="reset" name="b1"” value=" 复 ”位 " class=btn> 
<input type="button" value=" 返 回 " class=btn onclick="history.back();"> 
</p> 
</form> 
</body> 
</html> 
<%end if%> 


图 5-7 所 示 为 试题 编辑 界面 。 


单 洪 汪 篇 辑 


Ea 加 可 EE 


图 5-7 试题 编辑 界面 
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【说 明 】 思 考 如 何 将 试题 编号 在 页 面 超 链接 间 进 行 传 递 ， 以 便 删除 和 修改 完 该 试题 后 
能 显示 相应 页 ， 让 用 户 清 晰 地 看 到 操作 效果 。 本 例 演示 了 在 同一 程序 文件 中 实现 修改 的 编 
辑 显示 与 写 入 处 理 ， 引 入 了 一 个 URL 参数 UPD 来 区 分 ， 在 修改 写 入 处 理 时 该 参数 值 为 1。 

新 试题 输入 页 面 与 修改 页 面相 同 ， 只 是 在 输入 框 中 均 无 数据 。 其 写 入 处 理 也 和 修改 类 
似 ， 只 是 先 用 AddNew 方法 插入 一 条 新 记录 ， 然 后 将 数据 写 入 该 记录 。 读 者 可 自行 补充 完 
成 相应 功能 的 设计 。 

4. CancelUpdate 方法 

该 方法 用 于 取消 对 当前 记录 所 作 的 任何 更 改 或 放弃 新 添加 的 记录 。 其 语法 格式 如 下 : 

rs.CancelUpdate 

在 调用 Update 方法 后 将 无 法 撤销 对 当前 记录 或 新 记录 所 作 的 更 改 。 如果 尚未 更 改 当前 
记录 或 添加 新 记录 ， 则 调用 CancelUpdate 方法 将 会 产生 错误 。 

5，Find 方法 

该 方法 用 于 搜索 Recordset 中 满足 指定 标准 的 记录 。 如 果 满 足 标准 ， 则 记录 集 指 针 定 位 
在 找到 的 记录 上 ， 和 否则 将 定位 在 记录 集 的 末尾 。 其 语法 格式 如 下 : 

Find (criteria, SkipRows, searchDirection, start) 

其 中 : 
口 _criteria: 是 一 个 包含 查询 条 件 的 字符 串 ， 包 含 指定 用 于 搜索 的 列 名 、 比 较 操作 符 
和 值 的 语句 。 
口 ”SkipRows: 可 选 参数 ， 指 定 开始 查找 前 需 跳 过 的 记录 数 ， 默 认 值 为 0。 
口 ”searchDirection: 可 选 参数 ， 表 示 查 询 方向 。 有 两 个 取 值 : adSearchForward 表示 
向 后 搜索 记录 ; adSearchBackward 表示 向 前 搜索 记录 。 
口 start:， 可 选 参数 ， 为 指示 开始 查找 位 置 的 书签 
【说 明 】 
(1) criteria“ 比 较 操 作 符 ” 可 以 是 “>” (大于) 、“<” (小 于 ) 、“=” (等 于 ) 、 
“>=” (大 于 或 等 于 ) 、“<=” (小 于 或 等 于 ) 、“<>” (不 等于) 或 like (模式 匹配 ) 。 
criteria 中 的 值 可 以 是 字符 串 、 浮 点 数 或 日 期 。 

(2) criteria 中 不 支持 多 字段 ， 如 "name='abc"AND "city='sh" 是 不 允许 的 。 


5.5 Command 对 象 


Command 对 象 是 ADO 中 专门 用 于 对 数据 源 执行 一 组 命令 和 操作 的 对 象 ， 通 过 该 对 象 
可 以 执行 SQL 语句 、 数 据 库 中 的 存储 过 程 等 。 虽然 Connection 对 象 的 Execute 方法 也 能 
执行 SQL 语句 ， 但 不 同 的 是 Command 对 象 还 提供 了 参数 化 查询 等 专门 的 运行 方式 。 
一 般 来 说 ， 可 以 使 用 Command 对 象 的 集合 、 方 法 、 属 性 进行 下 列 操作 。 
(1) 使 用 CommandText 属性 定义 命令 (如 SQL 语句 ) 的 可 执行 文本 。 
(2) 通过 Parameter 对 象 和 Parameters 集合 定义 参数 化 查询 或 存储 过 程 参 数 。 
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(3) 可 使 用 Execute 方法 执行 命令 并 在 适当 的 时 候 返 回 Recordset 对 象 。 
创建 Command 对 象 的 语法 格式 如 下 : 
Set cmd = Server.CreateObject("ADODB.Command") 
在 后 续 命令 格式 介绍 中 ， 不 妨 用 cmd 代表 所 用 的 Command 对 象 。 


5.5.1 Command 对 象 的 常用 属性 


Command 对 象 的 属性 主要 有 ActiveConnection、CommandText、CommandTimeonut、 
CommandType 和 State 等 。 


1. ActiveConnection 属性 

该 属性 定义 了 Command 对 象 所 作用 的 连接 。 该 属性 设置 或 返回 Connection 对 象 或 连 
接 字符 串 。 经 常 的 用 法 是 将 一 个 Connection 对 象 赋值 给 该 属性 ， 例 如 : 

Cmd.ActiveConnection = conn 

如 果 是 一 个 应 用 连接 固定 的 数据 库 ， 也 可 以 将 连接 字符 串 存储 在 某 个 Session 对 象 中 ， 
则 以 后 可 用 如 下 方式 提供 到 数据 源 的 连接 。 

Cmd.ActiveConnection = Session("database_ConnectionString") 

2. CommandText 属性 

该 属性 用 来 指定 数据 查询 信息 ， 指 示 要 对 数据 库 进 行 的 各 种 操作 信息 ， 包 括 查 询 、 添 
加 、 删 除 、 更 新 等 操作 。 其 语法 格式 如 下 : 

Cmd.CommandText=SQL 语句 或 数据 表 名 或 查询 名 或 存储 过 程 名 

通常 SQL 语句 使 用 频率 较 高 。 

3. CommandTimeout 属性 

该 属性 用 来 设置 指示 等 待命 令 执 行 的 时 间 (单位 为 秒 ) ， 默 认 值 为 30。 如 果 在 指定 的 
时 间 内 命令 尚未 执行 完毕 ， 则 终止 尝试 并 产生 错误 。 

4. CommandType 属性 

该 属性 用 于 指定 数据 查询 信息 的 类 型 。 数 据 查 询 信息 可 以 是 SQL 语句 或 数据 表 名 或 查 
询 名 或 存储 过 程 名 ， 取 值 可 参见 Connection 对 象 中 的 介绍 。 


5.5.2 Command 对 象 的 常用 方法 


Command 对 象 的 常用 方法 有 Execute 和 CreateParameter。 
1. Execute 方法 


该 方法 用 来 执行 在 对 象 的 CommandText 属性 中 指定 的 查询 .其 用 法 与 Connection 对 象 
的 Execute 方法 基本 相同 。 其 语法 有 两 种 。 
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(1) 需要 返回 记录 集 ， 使 用 语句 为 Set rs=cmd.Execute()。 

(2) 无 返回 记录 集 的 操作 ， 如 添加 、 删 除 、 更 新 等 ， 使 用 语句 为 cmd.Execute。 
2. CreateParameter 方法 
该 方法 用 于 返回 一 个 Parameter 对象。 其 语法 格式 如 下 : 


Set param = cmd.CreateParameter(name,type,direction,size,value) 


其 中 : 

口 name 为 参数 的 引用 名 ， 在 后 面 引用 参数 的 值 时 会 用 到 。 
口 type 指定 参数 的 类 型 ， 其 值 如 表 5-14 所 示 。 

口 ”direction 指定 参数 是 输入 还 是 输出 ， 其 值 如 表 5-15 所 示 。 
口 size 指定 参数 的 最 大 长 度 或 最 大 值 。 

口 “value 指定 参数 的 值 。 


另外 ， 还 可 以 将 各 个 选项 分 开 来 写 ， 如 下 面 的 两 种 写法 是 等 价 的 : 
(1) Setparam= cmd.CreateParameter(name,type,direction,size,value) 
(2) set param= cmd.CreateParameter(name,type,direction,size) 
param.value=value 


表 5-14 type 值 
参数 说 明 
AddbTimeStamp 日 期 时 间 类 型 
AdInteger 整数 
AdSingle 单 精度 小 数 
AdDouble 双 精 度 小 数 
AdVarChar 变 长 字符 串 
参 数 说 ”有明 
AdParamInput 传 入 
AdParamOutput 传 出 
AdParamInputOutput 传 入 传 出 
AdParamRetumValue 从 子 程序 返回 数据 到 参数 中 


5.5.3 ”Command 对 象 的 数据 集合 


Command 对 象 的 数据 集合 有 Parameters 数据 集合 和 Properties 数据 集合 ， 前 者 表示 要 
传递 的 命令 参数 的 集合 ， 后 者 表示 Command 对 象 的 属性 集合 。Command 对 象 的 Properties 
数据 集合 与 Connection 对 象 的 使 用 类 似 ， 这 里 不 再 叙述 。 

1. 了 Parameters 参数 集合 


Parameters 参数 集合 只 有 一 个 Count 属性 ， 返 回 该 参数 集合 中 Parameter 参数 对 象 的 
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数目 。 
了 Parameters 集合 的 常用 方法 有 以 下 几 种 。 
(1) Append 方法 : 用 于 将 新 建 的 Parameter 对 象 加 入 到 Parameters 集合 中 。 其 语法 格 
式 如 下 : 
cmd.Parameters.Append Parameter 对 象 
(2) Delete 方法 : 用 于 删除 Parameter 对 象 。 其 语法 格式 如 下 : 
cmd.Parameters.Delete(index) 
其 中 ，index 为 删除 对 象 在 集合 中 的 索引 值 ， 索 引 值 编 号 从 0 开始 ， 按 添加 先后 顺序 排列 。 
(3) Item 方法 : 用 于 取得 Parameters. 集 合 内 的 某 个 Parameter 对 象 。 其 语法 格式 如 下 : 
Set Parameter 对 象 = cmd.Parameters.item(index) 
其 中 ，index 为 对 象 在 集合 中 的 索引 值 。 
(4) Refresh 方法 : 用 于 重新 整理 Parameters 集合 。 其 语法 格式 如 下 : 
cmd.Parameters.Refresh 
2. 了 Parameter 参数 对 象 
Parameter 参数 对 象 代表 基于 参数 化 查询 或 存储 过 程 的 Command 对 象 相关 联 的 参数 。 
该 对 象 负责 传递 Command 对 象 所 需要 的 SQL 命令 参数 ， 其 可 以 看 成 是 Command 对 象 的 
子 对 象 。 
如 果 使 用 参数 化 查询 , 则 可 以 调用 Parameters 集合 中 的 Append 方法 , 并 结合 Command 
对 象 中 的 CreateParameter 方法 ， 来 填充 Command 对 象 的 Parameters 集合 。 例 如 : 


cmd.CommandType = adCmdText ”' 常 量 对 应 值 为 1 

cmd.CommandText = "insert into employee(ID, Name) values(?,?)" 

set param = cmd.CreateParameter("ID",adlntegeradParamlnput,3,4) 
cmd.Parameters.Append param 

set param = cmd.CreateParameter("NM",adVarCharadParamlnput,255,"mary ) 
cmd.Parameters.Append param 

cmd.Execute 


【说 明 】SQL 语句 中 的 问号 为 数据 占 位 符 , Command 对 象 参数 集合 中 的 参数 会 按照 顺 
序 填充 相应 位 置 。 


5.5.4 通过 Command 对 象 调用 存储 过 程 


在 实际 开发 过 程 中 ，Command 对 象 主要 用 于 建立 记录 集 、 执 行 SQL 语句 或 调用 存储 
过 程 。 通 过 Command 对 象 调用 存储 过 程 是 最 常用 的 方法 。 使 用 存储 过 程 可 以 提高 系统 的 
运行 速度 、 减 少 网 络 传输 时 间 ， 同 时 也 为 系统 提供 了 一 种 安全 机 制 。 

【 例 5-7】 ASP 调用 存储 过 程 举例 

(1) 存储 过 程 

存储 过 程 〈getUserName) 的 功能 是 访问 用 户 信息 表 (userinfo) ， 根 据 用 户 ID 得 到 用 
户 名 。 其 中 ，UserID 为 输入 参数 ，UserName 为 输出 参数 。 具 体 代 码 如 下 : 
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CREATE PROCEDURE dbo.getUserName 
@UserlD int, 
@UserName varchar(40) output 
As 
set nocount on 
begin 
if @UserlD is null return 
select @UserName=username from dbo.[userinfo] where userid=@UserlD 
return 
end 
go 


(2) ASP 中 调用 存储 过 程 


-EX5-7 .9S -一 


<% 

DIM cmd,UserlD,UserName 

UserlD=1 

Set cmd = Server.CreateObject("ADODB.Command") 
cmd.ActiveConnection = Conn ' 假 设 Conn 是 数据 库 连接 对 象 
cmd.CommandText = "getUserName” ”' 指 定 存 储 过 程 名 
cmd.CommandType = 4 表明 这 是 一 个 存储 过 程 

"以 下 创建 参数 


cmd.Parameters.append cmd.CreateParameter("@UserlD",3,1,4,UserlD) 
cmd.Parameters.append cmd.CreateParameter("@UserName",200,2,40) 
cmd.Execute 

UserName = cmd(1) "取得 输出 参数 

9%> 


【注意 】 

(1) 对 于 存储 过 程 的 输入 参数 ， 要 为 CreateParameter 方法 提供 5 个 参数 ， 而 对 于 输 
出 参数 仅 需要 为 CreateParameter 方法 提供 4 个 参数 即 可 ，Value 不 需要 。 

(2) 参数 添加 顺序 一 定 要 与 存储 过 程 中 定义 的 顺序 相同 ， 而 且 各 参数 的 数据 类 型 、 长 
度 也 要 与 存储 过 程 中 定义 的 相同 。 


本 章 小 结 


ASP 访问 数据 库 的 处 理 是 Web 应 用 开发 的 核心 环节 。 借助 本 章 的 技术 ,可 以 实现 基于 
浏览 器 /服务 器 的 数据 库 应 用 ， 用 户 通 过 统一 的 客户 浏览 器 访问 分 布 在 Intemet 上 的 不 同 数 
据 库 应 用 系统 。 本 章 首先 简要 介绍 了 SQL 语句 的 使 用 ， 然 后 重点 介绍 了 ADO 的 7 个 对 象 
的 使 用 方法 ， 要 求 读 者 重点 掌握 Connection 对 象 、Recordset 对 象 、Command 对 象 的 使 用 
方法 ; 掌握 用 ODBC 驱动 程序 或 OLE DB 链接 字符 串 实 现 典型 数据 库 连 接 访 问 的 方法 ， 熟 
悉 记 录 集 的 字段 访问 、 记 录 指 针 的 移动 以 及 翻 页 访问 处 理 方法 ;掌握 用 Connection 对 象 、 
Recordset 对 象 、Command 对 象 实现 数据 库 记 录 的 增 、 删 、 改 的 方法 ; 了解 用 Command 对 
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象 和 Parameter 对 象 结合 执行 存储 过 程 的 编程 特点 。 
习 是 


1. 选择 题 
(1) 以 下 SQL 语句 中 可 查询 “用 户 信 息 ” 表 中 姓 “ 张 ”的 用 户 的 是 和 
A. SELECT* FROM 用 户 信息 WHERE 姓名 LIKE "% 张 %" 
B. SELECT * FROM 用 户 信息 WHERE 姓名 ="% 张 %" 
C. SELECT* FROM 用 户 信息 WHERE 姓名 LIKE " 张 %" 
D. SELECT * FROM 用 户 信息 WHERE 姓名 =" 张 %" 
(2) 以 下 SQL 语句 中 可 查 出 “用 户 信 息 ” 表 中 有 电子 邮件 地 址 (email》 的 用 户 的 是 
( 六 
SELECT* FROM 用 户 信息 WHERE email IS NOT NULL 
SELECT * FROM 用 户 WHERE email =NULL 
SELECT* FROM 用 户 信息 WHERE email NOT NULL 
SELECT* FROM 用 户 信息 WHERE email=NOT NUL 
(3) 可 以 实现 分 组 的 子 句 是 〈 ) 。 
A. ORDER BY B. GROUP BY C. HAVING D. WHERE 
(4) 在 “教材 ” 表 中 查 出 除 作者 “王小明 ”和 “李晓光 ”以 外 其 他 作者 的 信息 ， 以 下 
语句 中 可 以 实现 的 是 六 
A. SELECT * FROM 教材 WHERE NOT 作者 IN(" 王 小 明 " , "李晓光 ") 
B. SELECT * FROM 教材 WHERE 作者 NOT IN ("王小明 ", "李晓光 ") 
C. SELECT* FROM 教材 WHERE 作者 IS NOT "王小明 " AND IS NOT "李晓光 " 
D. SELECT * FROM 教材 WHERE 作者 <> (" 王 小 明 ", "李晓光 ") 
在 “教材 ” 表 中 ， 将 教材 数量 超过 500 本 的 教材 降价 5%， 正 确 的 命令 是 ( ja 
A. UPDATE 教材 SET 单价 = 单价 *0.95 WHERE 数量 >500 
B. SELECT 教材 SET 单价 = 单价 *0.95 WHERE 数量 >500 
C. UPDATE SET 单价 = 单价 *0.95 WHERE 数量 >500 FROM 教材 
D. EDIT 教材 SET 单价 = 单价 *0.95 WHERE 数量 >500 
(6) 若 要 删除 “用 户 信息 ” 表 中 用 户 标 识 为 “jsj0911” 的 记录 ， 正 确 的 命令 是 ( Wa 
A. DROP FROM 用 户 信息 WHERE 用 户 标 识 = "jsj0911" 
B. DELETE 用 户 信息 WHERE 用 户 标识 = "jsj0911" 
C. DROP 用 户 信 息 WHERE 用 户 标识 = "jsj0911" 
D. DELETE FROM 用 户 信 息 WHERE 用 户 标 识 ="jsj0911" 
(7) 以 下 关于 SQL 语句 的 描述 ， 正 确 的 有 ( 和 
A. SQL 命令 是 区 分 大 小 写 的 
B. 利用 UPDATE 命令 可 同时 修改 多 个 字段 值 


P 只 > 


吕 


(5 


_ 
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C. 每 个 SQL 命令 只 能 对 一 个 表 进 行 操 作 
D. 使 用 ORDER BY 子 句 对 查询 结果 进行 排序 时 ， 默 认 是 升序 


(8) 在 Connection 对 象 中 ， 用 于 存储 链接 信息 的 属性 是 〈 Ns 
A. ConnectionString B. Connection 
C. Open D. Execute 
(9) Connection 对 象 的 Mode 属性 设置 为 ( ) 值 时 可 “以 独占 方式 连接 数据 源 ”。 
A. 0 B;.. 冰 2 
D. 16 E, 12 
(10) 在 记录 集 RS 中 可 用 于 返回 记录 总 数 的 语句 是 〈 站 
A. num=RS.Count B. num=RS.RecordCount 
C. num=RS.Fields.Count D. num=RS.PageCount 


(11) 要 获得 记录 集 RS 中 当前 记录 的 “产品 型 号 ”字段 的 值 ， 该 字段 的 顺序 号 为 1， 
以 下 用 法 中 不 正确 的 是 〈 其 志 


A. fdvalue=RS(1) B. fdvalue=RS.Fields(" 产 品 型 号") 
C. fdvalue=RS(" 产 品 型 号 ") D. fdvalue=RS.Fields( 产 品 型 号 ).Value 
(12) 若 将 记录 指针 定位 到 记录 集 rs 的 最 后 一 条 记录 ， 应 用 ( ) 方法 来 实现 。 
A. Move B. MoveNext 
C. MovePrevious D. MoveLast 
2， 问 答题 


(1) 简 述 Connection 对 象 、Command 对 象 、Recordset 对 象 的 主要 功能 。 
(2) 简 述 ADO 的 各 对 象 与 数据 集合 的 关系 。 
3. 完成 SQL 语句 的 编写 
设 有 3 个 数据 表 ， 分 别 记 录 学 生 (STUDENT) 、 课 程 (COURSE) 、 成 绩 (SCORE) 
的 信息 ， 通 过 如 下 3 条 SQL 语句 建 表 。 
CREATE TABLE STUDENT(SNO VARCHAR(3) NOT NULL, SNAME VARCHAR(4) NOT 
NULL,SSEX VARCHAR(2) NOT NULL, SBIRTHDAY DATETIME, CLASS VARCHAR(5)) 
CREATE TABLE COURSE( CNO VARCHAR(5) NOT NULL, CNAME VARCHAR(10) NOT 
NULL, TNO VARCHAR(10) NOT NULL) 


CREATE TABLE SCORE( SNO VARCHAR(3) NOT NULL, CNO VARCHAR(5) NOT NULL, 
DEGREE NUMERIC(10, 1) NOT NULL) 


同时 通过 SQL 语句 分 别 插入 若干 条 数据 记录 ， 例 如 : 


INSERT INTO STUDENT (SNO,SNAME,SSEX,SBIRTHDAY,CLASS) VALUES(108 ,' 曾 华 ' , 男 
' ,1977-09-01,95033); 

INSERT INTO COURSE(CNO,CNAME,TNO) VALUES ("3-105' ,计算 机 导论 ,825) 

INSERT INTO SCORE(SNO,CNO,DEGREE) VALUES (103,3-245 ,86); 


试 编写 实现 如 下 功能 的 SQL 语句 : 
(1) 查询 Score 表 中 成 绩 在 60 一 80 分 之 间 的 所 有 记录 。 
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(2) 查询 Student 表 中 95031 班 或 性 别 为 “ 女 ” 的 同学 的 记录 。 

(3) 以 Cno 升序 、Degree 降序 查询 Score 表 中 的 所 有 记录 。 

(4) 查询 95031 班 的 学 生 人 数 。 

(5) 查询 Score 表 中 最 高 分 的 学 生 学 号 和 课程 号 。 

(6) 查询 3-105 号 课程 的 平均 分 。 

(7) 查询 Score 表 中 课程 编号 以 3 开头 的 课程 的 平均 分 数 。 

(8) 查询 Student 表 中 不 姓 “ 王 ”的 同学 的 记录 。 

(9) 查询 成 绩 比 该 课程 平均 成 绩 低 的 同学 的 成 绩 表 。 

(10) 查询 “计算 机 导论 ”课程 的 所 有 “ 男 ” 同 学 的 成 绩 表 。 

4. 编程 题 

(1) 编写 一 个 班级 学 生 管理 程序 的 应 用 ， 提 供 班级 学 生 的 增 、 删 、 改 、 查 功能 。 

(2) 编写 一 个 应 用 实现 用 户 登录 检查 ,数据 库 表 格 中 存储 用 户 所 属 角 色 。 角 色 分 为 学 
生 、 教 师 、 管 理 员 ， 用 户 登录 后 能 根据 角色 转向 不 同 页 面 。 对 于 不 具备 相应 角色 要 求 的 用 
户 ， 不 允许 未 经 登录 直接 访问 页 面 。 

(3) 统计 用 户 访问 系统 的 次 数 ， 用 户 每 成 功 登 录 系 统一 次 ， 访 问 次 数 即 增加 1。 利 用 
数据 库 表 格 字段 记录 用 户 的 访问 次 数 。 

(4) 调试 以 下 ASP 留言 每 程序 (guestbook.asp) ， 数 据 库 名 为 guestbook.mdb， 记 录 
留言 的 数据 表 words 有 3 个 字段 ，xm 表示 留言 者 ，ly 表示 留言 内 容 ，sj 表示 留言 时 间 。 


<html> 
<body> 
<form METHOD="POST" action="guestbook.asp"> 
<p> 姓 名 :<input TYPE="text" SIZE="20" NAME="xm"></p> 
<p> 留 言 :</p> 
<p><textarea ROWS="5" COLS="80" NAME="|ly"></textarea></p> 
<p><input TYPE="submit" VALUE=" 记 入 留言 往 " NAME="B1"> 
<input TYPE="reset" VALUE=" 复 原 " NAME="B2"></p> 
</form> 
<hr> 
<% 
Set conn=Server.CreateObject("ADODB.Connection") 
conn.Open "provider=microsoft.jet.oledb.4.0;data source=" 
& server.MapPath("guestbook.mdb") 
If request("xm")<>"" then 
xm=Request("xm") 
sj = Date() 
Sj=Ssj&""& Hour(Time()) & ":" & Minute(Time()) 
ly=Request("ly") 
sql="INSERT INTO words VALUES(" & xm &"," &sj&","&ly&"™)" 
conn.execute sql 
End If 
sql = "SELECT * FROM words ORDER BY sj DESC" 
Set rs = conn.execute(sql) 


_ 
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Response.Write "<table width=90% ><td> 姓 名 </td><td> 发 送 时 间 </td><td> 留 言 内 容 </td>" 
do while Not rs.eof %><tr> 

<td><%= rs.Fields("xm").Value%></td> 

<td><%= rs.Fields("sj").Value%></td> 

<td><%= rs.Fields("ly").Value%></td> 

<% rs.movenext 

loop %> 

</table> 

</body> 

</html> 


对 程序 进行 调试 ， 并 做 如 下 修改 。 

@ 在 数据 输入 域 中 输入 HTML 标记 代码 ， 验 证 输出 。 同 时 将 数据 库 访问 的 字段 输出 
内 容 用 Server.HTMLEncode 函数 进行 变换 ， 进 一 步 验证 输出 有 何 变化 。 

@ 增加 数据 校 验 代码 ， 当 用 户 输入 的 姓名 和 留言 为 空 时 进行 提示 处 理 。 

(5) 实现 一 个 多 选 题 的 输入 管理 程序 ， 每 道 试题 包括 试题 内 容 、 标 准 答案 、 难 度 、 所 
属 章节 等 字段 。 要 求 能 对 各 类 试题 进行 增 、 删 、 改 、 查 功能 。 注 意 ， 查 询 支 持 分 页 查看 。 

(6) 实现 网 络 教 学 中 的 用 户 管理 功能 。 用 户 按 班级 进行 管理 ， 能 进行 用 户 的 增 、 删 、 
改 、 查 操作 。 通 过 下 拉 列 表 框 选择 班级 ， 可 看 到 班级 所 有 学 生 ， 并 对 该 班 学 生 进行 增 、 删 、 
改 操作 。 

(7) 实现 个 人 记事 本 ,记录 每 天 的 重要 事情 ,能 对 所 记 内 容 进行 增 、 删 、 改 、 查 操作 。 
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JavaScript 是 Netscape 公司 推出 的 一 种 脚本 语言 , 得 到 了 各 种 浏览 器 的 支持 , 利用 它 可 
操作 和 控制 浏览 器 中 的 各 种 对 象 。 实 际 应 用 中 经 常 利用 JavaScript 编写 的 客户 端 脚本 完成 
各 类 交互 功能 ， 如 对 用 户 所 输入 的 数据 进行 有 效 性 检验 等 。 


6.1 JavaScript 的 基本 语法 成 分 


6.1.1 在 网 页 中 插入 JavaScript 代码 


在 HTML 网 页 中 插入 JavaScript 语句 ， 应 使 用 HIML 的 <scrip 亿 标记; 或 者 使 用 <script 
language="javascript">， 但 language 属性 在 W3C 的 HTML 标准 中 已 不 再 推荐 使 用 。 

JavaScript 程序 可 以 放 在 HTML 网 页 的 <body> 标 记 或 <head> 标 记 中 。 经 常 将 代码 编写 
为 函数 形式 放 在 HTML 的 <head></head> 中 , 当 用 户 操作 网 页 的 某 个 对 象 时 触发 事件 , 通过 
执行 事件 处 理 来 调用 该 JavaScript 函数 。 

如 果 某 JavaScript 程序 被 多 个 HTML 网 页 使 用 ， 最 好 的 方法 是 将 这 个 JavaScript 程序 
放 到 一 个 后 级 名 为 js 的 文本 文件 中 ， 在 需要 使 用 时 ， 用 如 下 方式 引入 页 面 中 : 

<Script Language="JavaScript" src="java/java.js"></script> 

这 样 可 以 提高 代码 的 复 用 性 ， 减 轻 代码 维护 的 负担 。 

【 例 6-1】 求 一 个 数 的 阶乘 


0 


<body> 
<script language="javascript"> 
var N=5; 
f=1; 
for (k=1;k<=n;k++) { 
f= 他 ki; 


1 

alert(n +"l="+f); /显示 5! 值 
</script> 

<body> 

</html> 


第 6 章 JavaScript 脚本 语言 “。121 


运行 程序 , 将 看 到 页 面 中 弹出 一 个 提示 框 , 如 图 6-1 
所 示 。alert 函数 的 作用 是 弹出 消息 框 显示 提示 信息 ， icrosoft Internet Ezplorer 区 | 
该 函数 实际 就 是 后 面 要 介绍 的 window 对 象 的 alert 方 企 5l-l20 
法 ， 在 使 用 该 方法 时 可 省 略 前 绥 window。 


己 本 站 
【说 明 】 = 
(1) JavaScript 程序 由 JavaScript 语句 构成 , 语句 图 6-1 求 n 的 阶乘 


间 用 分 号 分 隔 ， 也 可 省 略 分 号 。 用 了 括 起 来 的 一 组 语 
句 称 为 语句 块 ， 语 名 块 在 语法 上 相当 于 一 条 单独 的 语句 。 语 名 块 中 的 每 条 语句 用 分 号 表示 
结束 ， 但 是 语句 块 本 身 不 用 分 号 。 当 语句 很 长 时 要 让 代码 自动 换行 ， 一 条 语句 中 不 能 有 硬 
回 车 


(2) 为 了 程序 的 可 读 性 ， 可 以 在 程序 中 为 代码 写 注释 。JavaScript 有 两 种 注释 ， 即 单 
行 注 释 和 多 行 注 释 。 单 行 注释 以 两 个 斜 杠 /开头 ， 多 行 注释 用 * 表 示 开 始 ， 用 */ 表 示 结 束 。 
(3) 程序 中 的 var 和 for 均 为 JavaScript 保留 字 。 保 留 字 是 指 在 JavaScript 语言 中 具有 
特定 含义 ， 成 为 JavaScript 语法 中 一 部 分 的 那些 字 。JavaScript 的 保留 字 有 break、delete、 
function、 retum、 typeof、 case、 do、 if、 switch、 var、 catch、 else in、this、void、continue、 
false、 instanceof、 throw、 while、 debugger、 finally、 new true、 with、 default、 for、 null、 try。 
JavaScript 中 还 有 一 些 未 来 保留 字 ， 这 些 字 虽 然 目 前 没有 在 JavaScript 语言 中 用 到 ， 但 
是 将 来 有 可 能 用 到 。JavaScript 的 未 来 保留 字 有 abstract、double、goto 、native、static、boolean、 
enum、 implements、 package、 super byte、export、import、 private、synchronized、char、extends、 
int、 protected、 throws class、 final、 interface、 public、 transient、 const、 float、 long、 short、 volatile。 


6.1.2 ”数据 类 型 与 变量 


(1) 变量 的 声明 与 赋值 
变量 是 用 来 临时 存储 数值 的 容器 。 在 使 用 一 个 变量 之 前 ， 通 常 要 用 var 声明 这 个 变量 ， 
同时 声明 多 个 变量 ， 变 量 之 间 用 逗号 相隔 。 例 如 : 


Var X,y,Z; 


var a=2, b=5; /声明 变量 ， 并 为 变量 赋 初 始 值 


变量 的 值 是 可 以 变化 的 。JavaScript 提供 了 3 种 基本 的 数据 类 型 ， 分 别 为 数值 型 、 逻 辑 
型 和 字符 串 型 ， 另 外 还 有 undefined 和 null 两 个 特殊 情形 。 当 声明 了 一 个 变量 而 未 赋值 前 ， 
该 变量 值 为 undefined。 没 有 声明 的 变量 为 Null 型 ， 它 也 只 有 一 个 值 null。 

另外 ，JavaScript 中 还 有 引用 数据 类 型 ， 引 用 类 型 的 变量 存储 在 相应 变量 单元 的 内 容 是 
一 个 地 址 指针 ， 为 所 指 对 象 在 内 存单 元 的 位 置 。 对 象 、 数 组 和 函数 均 属 于 引用 类 型 。 
(2) 变量 的 命名 规则 
变量 名 可 以 是 任意 长 度 ， 它 必须 符合 下 列 规则 : 
口 变量 名 的 第 一 个 字符 必须 是 英文 字母 或 下 划 线 符号 “_”。 
口 ”变量 名 的 第 一 个 字母 不 能 是 数字 ， 而 其 后 的 字符 可 以 是 英文 字母 、 数 字 或 下 划 线 。 
口 变量 名 不 能 是 JavaScript 的 保留 字 。 
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【注意 】JavaScript 代码 是 区 分 大 小 写 的 。 例 如， 变量 myname 和 MyName 表示 的 是 两 
个 不 同 的 变量 。 同 样 ， 对 象 window 也 不 能 写成 Window。 
(3) 变量 的 作用 域 
变量 的 作用 域 是 指定 变量 的 存活 范围 ， 在 JavaScript 中 ， 变 量 的 作用 域 可 分 为 过 程 级 
和 页 面 级 。 所 谓 过 程 级 指 变量 只 在 函数 过 程 内 有 效 ， 而 页 面 级 指 变量 在 整个 页 面 有 效 。 
口 ”函数 中 用 var 定义 的 变量 只 在 函数 体内 有 效 ， 如 果 出 现 同名 ， 则 屏蔽 函数 外 的 变量 。 
口 ”如果 变 量 未 用 var 定义 ， 则 意味 着 使 用 函数 外 同名 的 变量 ， 如 果 没 有 同名 的 函数 
外 变量 ， 则 此 变量 在 函数 外 仍然 有 效 。 
【 例 6-2】 变量 作用 域 演示 


和 -exX6-2.htm------ 一 -一 
<script language="javascript"> 
var x=13,y=29; // 页 面 级 变量 
function test() { 
var num,y=10; // 过 程 级 变量 ， 这 里 y 隐藏 外 部 定义 的 y 
num=x+y; 
2 
alert(" 内 部 的 num 的 值 为 : "+num); /显示 num 为 23 
} 
test(); // 调 用 test 函数 
alert("x 的 值 为 : "+X); /显示 x 为 14 
alert(" 外 部 的 num 的 值 为 : "+num); // 无 显示 ， 这 里 不 能 访问 num 
</script> 


【说 明 】 本 例 编写 了 一 个 函数 test0， 并 在 页 面 代码 中 调用 该 函数 ， 运 行程 序 可 看 到 两 
个 提示 框 ， 一 个 是 在 函数 内 显示 num 的 值 ， 另 一 个 是 在 外 部 显示 x 的 值 ， 但 无 法 看 到 外 间 
显示 num 的 值 的 提示 框 。 因 为 num 为 过 程 级 变量 ， 在 函数 外 不 能 访问 ， 并 因此 出 现 访问 异 
常 ， 代 码 将 停止 执行 。 


6.1.3 JavaScript 运算 符 


(1) 算术 运算 符 

算术 运算 符 有 + (加 法 ) 、- (减法 ) 、* (乘法 ) 、/ (除法 ) 、% ( 求 余数 ) 、++ ( 递 
增 ) 、 一 (递减 )。 

其 中 ， 运 算 符 (+) 既 可 用 于 数值 运算 ， 又 可 用 于 字符 串 的 拼接 。 

(2) 关系 运算 符 

关系 运算 符 有 > (大 于 ) 、>= (大 于 等 于 ) 、< (小 于 ) 、<= (小 于 等 于 ) 、!= (不 等 ) 、 
二 (等 于 ) 、 一 = (全 等 于 ) 、! 一 (不 全 等 于 ) 。 

其 中 ， (全 等 于 ) 表示 不 仅 值 相等 , 而 且 数据 类 型 也 相等 。 例如 , 如 果 有 x=2;y="2";， 
则 x===y 为 False 值 ， 而 x==y 为 Tme。!=〈 不 全 等 于 ) 表示 不 等 于 或 类 型 不 同 。 

(3) 逻辑 运算 符 

逻辑 运算 符 有 与 (&&) 、 或 (|)、 非 (!)。 
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(4) 位 运算 符 
位 运算 是 对 操作 数 以 二 进 制 比特 (bit) 位 为 单位 进行 的 操作 运算 ， 其 操作 数 和 结果 都 
是 整 型 量 。 下 面 列 出 儿 种 位 运算 符 和 相应 的 运算 规则 ， 如 表 6-1 所 示 。 


表 6-1 位 运算 符 


操作 


全 结果 是 op 按 比 特 位 求 反 
Se opl >> op2 将 opl 右 移 op2 个 位 ( 带 符号 ) 
opl1 << op2 将 opl 左 移 op2 个 位 ( 带 符号 ) 
opl >>> op2 将 opl 右 移 op2 个 位 〈 不 带 符号 的 右 移 ) 


opl 和 op2 都 是 True 
op1 或 op2 是 True 
opl 和 op2 是 不 同 值 


(5) 赋值 运算 符 
赋值 组 合 运 算 符 是 指 在 赋值 运算 符 的 左边 有 一 个 其 他 运算 符 ， 例 如 : 
x+=2; /相当 于 x=x+2 


其 功能 是 先 将 左边 变量 与 右边 的 表达 式 进 行 某 种 运算 ， 再 把 运算 的 结果 赋 给 变量 。 能 
与 赋值 运算 符 结合 的 运算 符 包括 算术 运算 符 (+、-、*#、/、%) 和 位 运算 符 (&、|、^、>>、 
RD 


6.1.4 内置 函 数 


JavaScript 中 有 如 下 儿 种 常用 的 全 局 函数 。 

eval(string):; 返回 字符 串 表达 式 中 的 值 ， 如 eval("2+4*5") 的 结果 为 22。 
isFinite(exp): 确定 一 个 变量 是 否 有 界 ， 如 果 有 界 则 返回 True， 和 否则 为 False。 
isNaN(n): 确定 一 个 变量 是 否 为 NaN， 如 果 是 则 返回 True， 和 否则 返回 False。 
parseFloat(floatstring): 返回 实数 ， 若 字符 串 不 是 以 数字 开头 ， 则 返回 NaN。 
parseInt(numberstring,radix): 将 第 一 个 参数 所 给 的 数字 串 转 换 为 radix 指定 的 进 制 
的 数值 。 若 字符 串 不 是 以 数字 开头 ， 则 返回 NaN。 如 果 第 二 个 参数 为 默认 参数 ， 
则 返回 十 进 制 数 。 

口 escape(string): 对 字符 串 的 特殊 字符 进行 转换 编码 ， 以 满足 特殊 处 理 的 要 求 。 

口 unescapeGstring): 完成 escape0 函 数 的 逆 操 作 ， 将 编码 后 的 串 恢复 到 源 串 。 

【 例 6-3】 escape 和 unescape 函数 的 演示 


[| 


-— -i ‘ex6-3.htm: 一 
<script type="text/javascript"> 

var test1="welcome to ecjtu” 

test1=escape(test1) // 编 码 

document.write (test1 + "<br />") 
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test1=unescape(test1) // 反 编码 
document.write(test1 + "<br />") 

</script> 

运行 结果 如 下 : 

welcome%20to%20ecjtu%021 


welcome to ecjtu! 


【说 明 】 这 里 利用 了 document 对 象 的 write 方法 向 页 面 文档 中 写 入 要 和 输出 显示 的 信息 。 
6.2 ”程序 流程 控制 语句 
6.2.1 条 件 语句 


JavaScript 条 件 语 句 有 让 语句 和 switch 语句 两 种 。 
(1) 让 语句 
让 语句 语法 格式 如 下 : 
让 (条 件 表 达 式 ) statementl [else statement2] 
其 中 ，else 部 分 可 没有 ; 如 果 statementl 和 statement2 由 多 条 语句 组 成 ， 则 必须 用 大 括 
号 ({ }) 括 起 来 。 
(2) switch 语句 
switch 语句 用 于 多 分 支 处 理 ， 其 语法 格式 如 下 : 
switch (expression) 
{ 
case labell : 
statementl 
break 
case label2 : 
statement2 
break 


default : 
statementdefault 
} 
如 果 expression 的 值 为 labell， 则 执行 statementl 代码 ;如果 expression 的 值 为 label2， 
则 执行 statement2 代码 ; 以 此 类 推 。 如 果 expression 不 符合 任何 情形 ， 则 执行 default 内 的 
statementdefault 代码 。switch 条 件 语句 中 的 break 表示 switch 语句 结束 .如果 没有 使 用 break 
语句 , 则 找到 匹配 的 label 开始 执行 , 后 面 的 多 个 label 块 都 将 被 执行 , 直到 遇 到 break 为 止 。 
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【 例 6-4】 今天 是 上 课 还 是 休息 


-> — - - - -ex6-4.htm- - - -一 
<script type="text/javascript"> 
var d = new Date() 
theDay = d.getDay() 
Switch (theDay){ 
case 6: 
case 0: 
alert(" 休 息 日 ) 
break 
default: 
alert(" 上 课 日 ) 
} 


</script> 


6.2.2 ”循环 语 名 


JavaScript 循环 语句 有 for 循环 语句 、do…while 循环 语句 、while 循环 语句 。 
(1) for 循环 语句 
for 循环 语句 的 语法 格式 如 下 : 
for (expl;exp2;exp3) { statement } 
其 中 ，exp1l 为 循环 前 的 初 值 设置 ，exp2 为 条 件 表达 式 ， 只 有 当 exp2 为 True 时 才 执 行 
循环 体 ，exp3 是 一 个 更 新 循环 控制 变量 的 表达 式 ， 它 使 循环 离 结束 更 近 。 
(2) while 循环 语句 
while 循环 语句 的 语法 格式 如 下 : 
while( 条 件 ){statement} 
当 条 件 为 True 时 ， 反 复 执行 循环 体 ， 要 注意 statement 中 必须 有 让 循环 条 件 能 发 生变 
化 的 操作 ， 从 而 避免 出 现 死 循环 。 
(3) do…while 循环 语句 
do…while 循环 与 while 循环 相似 ， 不 同 之 处 在 于 它 总 是 至 少 运行 一 次 ， 因 为 其 是 在 循 
环 的 末尾 检查 条 件 ， 而 不 是 在 开头 。 
【 例 6-5】 求 一 个 数 的 各 位 数字 之 和 
-一 -一 ---- -ex7-5.htm- - - - -一 


<script type= "text/javascript > 
varx = window.prompt(" 请 输入 一 个 整数 ",""); // 读 一 个 输入 串 


var y = parselnt(x); /将 字符 串 转化 为 整数 

var n=0; 

while (y>0){ 
n=n+y%10; 1/ 取 yy 的 最 低位 数字 
y=Math.floor(y/10); // 取 出 结果 的 整数 部 分 ，y 去 掉 最 低位 


} 
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document.write(x+" 的 各 位 数字 之 和 为 : "+n); 
</script> 
执行 代码 ， 首 先 执行 window 对 象 的 prompt 方法 ， 弹 出 “Explorer 用 户 提 示 ” 对 话 框 ， 
提示 等 待 用 户 输入 数据 ， 如 图 6-2 (a) 所 示 。 在 输入 数据 后 ， 单 击 “ 确 定 ” 按 钮 ， 即 可 在 
网 页 文档 中 输出 结果 ， 如 图 6-2 (b) 所 示 。 


互 vhile 循 环 的 示例 - Hicrosoft --- 基 | 后 | 必 ] 
文件 四 “ 纺 缉 四 查看 WW 收 京 和 ”和 扫 接 ” 大 
地 让 四) | 全 De ht 本 是 和 


6523 的 各 位 数字 之 和 为 :16 


图 6-2 求 一 个 数 的 各 位 数字 之 和 


(4) 使 用 break 和 continue 语句 
break 和 continue 语句 均 可 用 于 循环 内 ， 执 行 break 语句 将 中 断 一 个 循环 的 运行 。 执 行 
continue 语句 则 越过 余下 的 代码 块 而 直接 跳 到 循环 的 下 一 次 重复 中 。 
【 例 6-6】 输出 1 一 10 之 间 的 奇数 
exX7-6 htm 
<script type="text/javascript"> 
var xi 
for (x=1; x<=10; x++) { 


if (x%2==0) 
continue; // 如 果 x 被 2 整除 ， 则 跳 过 后 面 的 代码 ， 开 始 下 一 次 重复 


document.write (x + "<br>"); 


} 
</script> 


6.3 内 置 对 和 象 


JavaScript 语言 是 基于 对 象 的 ， 程 序 中 可 以 根据 需要 创建 对 象 ， 每 一 个 对 象 均 有 自己 的 属 
性 和 方法 。 对象 分 为 内 置 对 象 、 浏 览 器 对 象 、 文档 对 象 、 用 户 自 定义 对 象 4 种 不 同类 型 的 对 象 。 
常用 的 内 置 对 象 有 String 对 象 、Math 对 象 、Array 对 象 和 Date 对 象 。 内 置 对 象 通过 使 
用 new 关键 字 和 对 象 构造 函数 创建 对 象 实 例 ， 并 可 以 通过 “.” 运 算 符 来 访问 对 象 实例 的 属 


性 和 方法 。 


6.3.1 String 对 象 


创建 一 个 String 对 象 ， 可 用 如 下 语法 : 
var 变量 名 = new String(" 字 符 串 "); 
事实 上 ， 任 何 一 个 字符 串 常量 都 是 一 个 串 对 象 ， 例 如 : 
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var msg="Welcome ; 


以 上 两 种 形式 定义 的 字符 串 在 使 用 上 没有 差异 ， 两 者 的 区 别 是 typeof 的 返回 值 不 同 ， 
后 者 是 string， 前 者 是 object。 
(1) 属性 
length: 字符 串 的 长 度 ， 即 字符 串 中 字符 的 个 数 。 
(2) 方法 
口 ”charAt(index): 返回 字符 串 中 index 处 的 字符 。 
口 ”indexOfl(substr,[fromIndex]): 返回 字符 串 中 substr 子 串 第 一 次 出 现 的 位 置 ， 如 果 未 
找到 ， 则 返回 -1; 如 果 给 定 了 fromIndex， 则 从 字符 串 内 该 位 置 开 始 搜索 。 
口 ”lastIndexOflsubstr,[fromIndex]): 从 字符 串 的 尾部 向 前 搜索 substr， 并 返回 第 一 个 出 
现 的 位 置 ， 如 果 未 找到 ， 则 返回 -1。 
口 ”substring(indexA.indexB): 从 字符 串 获 取 自 indexA 到 indexB 的 子 串 。 
口 toLowerCase0: 返回 的 字符 串 是 将 字符 串 中 所 有 字符 全 部 转换 成 小 写 。 
口 toUpperCase0: 返回 的 字符 串 是 将 字符 串 中 所 有 字符 全 部 转换 成 大 写 。 
可 为 字符 串 增加 相应 的 HTML 标记 的 方法 有 big0、blink0、bold0、fixed0、italicsO、 
small()、sub()、strike()、sup()、fontColor(color)、fontSize(size)。 


【 例 6-7】 用 字符 串 的 处 理 方法 求 一 个 数字 串 的 各 位 数字 之 和 


<script type="text/javascript"> 
var x = Window.prompt(" 请 输入 一 个 整数 ",");， // 读 一 个 输入 串 
var k=0; 
var n=0; 
do { 
n = n+ (x.charAt(k)-'0"); // 取 x 的 第 k 个 位 置 的 数字 
IE 
} while (k<x.length) 
document.write(x+" 的 各 位 数字 之 和 为 : "+n); 
</script> 


【说 明 】 从 字符 串 中 逐个 取出 各 位 数字 字符 ， 注 意 ， 将 数字 字符 转化 为 数字 值 的 一 个 
简单 方法 是 将 字符 与 代表 零 的 字符 进行 相 减 , 这 是 利用 数字 字符 的 编码 顺序 递增 1 的 特点 。 
【 例 6-8】 在 状态 栏 实现 滚 动 字幕 


eeX6-8.htm-- 一 一 一 一 一 - - - -i - 
<script language="javascript"> 
var msg = "欢迎 光临 访问 我 的 网 站 ""; 
var i=1; 
function scroll() { 
mess = msg.substring(i,msg.length)+""+msg.substring(0,i); 
window.status=mess; 
it 
if (i>==msg.length) i=1; /滚动 到 消息 末尾 ， 从 头 开始 
setTimeout("scroll()",200); // 延 时 决定 滚动 速度 


-一 -exX6-7.htm-- 一 一- 一 
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h 
</script> 
<body onload="scroll()"></body> 


【说 明 】setTimeout 为 window 对 象 的 一 个 方法 ， 用 来 设置 多 少 毫 秒 后 调用 指定 函数 。 


本 例 调用 scroll0 函 数 引 入 了 事件 机 制 。 通 过 body 标记 
件 触发 执行 scroll 函数 。 


6.3.2 ”Array 对象 


1. 创建 数组 对 象 实例 
创建 数组 对 象 实例 有 如 下 几 种 形式 : 


的 onload 属性 设置 定义 页 面 装载 事 


格式 1: var x= new Array(); /数组 的 初始 大 小 不 定 
格式 2: var y= new Array(size) /创建 初始 大 小 为 size 的 数组 
格式 3: var z= new Array(1,2,3,5,6,8) // 按 提供 的 初始 化 数据 创建 数组 


格式 1 创建 的 数组 是 动态 数组 ， 也 即 数 组 的 大 小 是 不 定 的 ; 格式 2 产生 一 个 指定 大 小 


的 数组 ， 但 数组 的 大 小 在 程序 运行 时 仍然 可 变 ; 格式 3 
组 ， 数 组 的 大 小 取决 于 初始 化 数据 的 个 数 。 
2. Array 对 象 的 属性 和 方法 


按 括 号 中 提供 的 初始 化 数据 创建 数 


Array 对 象 的 length 属性 表示 一 个 数组 中 元 素 的 个 数 。 


Array 对 象 的 常用 方法 有 以 下 几 种 。 
口 reverse0: 将 一 个 数组 按 倒 序 重 排 。 


口 sort0: 按 由 小 到 大 的 顺序 对 数组 元 素 重 新 排序 。 


3. 数组 元 素 的 访问 
数组 元 素 的 访问 格式 如 下 : 


数组 名 [下 标 值 ] 
例如 : 
x[1]=12 /给 下 标 为 1 的 元 素 赋值 为 12 
【注意 】 
(1) 同一 数组 的 元 素 赋值 类 型 可 以 不 同 。 例 如 : 
x[0]= 20; /数值 型 
Xx[1]= "你 好 "; // 字 符 串 型 
x[2]= true; /逻辑 型 


(2) 数组 元 素 还 可 以 是 对 象 ， 当 数组 元 素 为 一 个 数组 时 ， 就 可 得 到 一 个 二 维 数组 。 例 如 : 


var arr=new Array(5); 
for (k=0;k<arr.length;k++) 
arr[k]=new Array(4); 
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二 维 数组 的 元 素 引 用 如 下 : 
数组 名 [第 一 维 下 标 ][ 第 二 维 下 标 ] 
例如 ，arr[2][3] 代 表 引 用 第 3 行 第 4 列 的 元 素 。 
小 =8”。 
<script type="text/javascript"> 


(3) 数组 的 大 小 会 随 元 素 赋值 访问 动态 变化 。 例 如 ， 运 行 以 下 代码 ， 结 果 为 “数组 大 
var d = new Array(5); 
d[7]=123; 


alert(" 数 组 大 小 ="+d.length); 
</script> 
6.3.3 Date 对象 


Date 对 象 封装 了 有 关 日 斯 和 时 间 的 操作 ， 它 没有 任何 属性 ， 但 有 很 多 方法 。 创 建 日 期 
对 象 的 语法 格式 如 下 : 

Now = new Date([ 参 数 表 ]); 
常用 方法 如 下 。 


getDate(): 当月 日 期 部 分 


-个 对 象 实例 。 
范围 为 1 一 31。 

getDay0: 返回 该 星期 的 第 几 天 ， 范 围 为 0 一 6。 
getMonth(): 返回 月 份 ， 范 围 为 0 一 11。 
getTime(): 返回 自 1970 年 1 月 1 日 00:00:00 以 来 的 毫秒 数 。 
getYear(): 在 2000 年 以 前 返回 后 两 位 ， 在 2000 年 以 后 返 
getHours(): 返回 小 时 数 。 
getMinutes0: 返 


回 分 钟 数 。 
getSeconds0: 返回 


秒 数 。 
setYear(int); 设置 年 。 


回 4 位 。 
setDate(inD: 设置 当月 号 数 。 

setMonth(int): 设置 当月 份 数 
setHours(inD: 设置 小 时 数 。 


BBE0DGDDSDDDD:DO 


setMinutes(int): 设置 分 钟 数 
setSeconds(inD: 设置 秒 数 。 
setTime(int): 设置 毫秒 数 。 
6.3.4 


Math 对 象 


Math 对 象 包含 用 来 进行 数学 计算 的 属性 和 方法 ， 其 属性 就 是 一 些 标准 的 数学 常 


里 ， 


其 
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方法 构成 了 数学 函数 库 。 


【注意 】Math 对 象 的 属性 和 方法 均 直 接 用 Math 作为 前 级 使 
算 符 创建 Math 对 象 。 


1. 常用 属性 
Math 对 象 的 常用 属性 如 表 6-2 所 示 。 
表 6-2 Math 对象 的 常用 属性 


， 另 外 ， 不 能 用 new 运 


常 量 近 似 什 
MathE e 2.71828459045 
0.69314718056 


Math LN2 In2 | 
Math LN10 


2.30258509299 


Math.LOG2E 


Math.LOGI10E 


1.44269504889 
0.43429448190 


2. 常用 方法 

Math 对 象 的 常用 方法 如 下 。 
Math.floor(n): 返回 小 于 等 于 n 的 最 大 整数 。 
Math.round(n): 返回 最 靠近 nm 的 整数 。 
Math.max(n1,n2): 取 nl、n2 中 的 最 大 值 。 
Math.min(n1,n2): 取 nl、n2 中 的 最 小 值 。 
Math.pow(n1,n2): 返回 nl 的 n2 次 方 。 
Math.random(): 产生 0 一 1 之 间 的 随机 数 。 
Math.sqrt(n): 返回 n 的 平方 根 。 
Math.abs(n): 返回 n 的 绝对 值 。 
Math.exp(n): 返回 e 的 n 次 方 。 
Math.log(n): 返回 n 的 自然 对 数 。 
Math.sin(n): 返回 n 的 正弦 值 。 


BE: BD GDB 


6.4 ” 自 定 义 函 数 


6.4.1 函数 的 定义 
语法 格式 如 下 : 
function 函数 名 (形式 参数 ){ 
函数 体 
return 表达 式 
} 
函数 的 定义 通常 放 在 网 页 的 <head></head> 标 记 部 分 。 


3.14159265359 
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【注意 】 如 果 函 数 调用 时 参数 为 引用 型 实 参 ， 那 么 在 函数 内 修改 实 参 变量 值 就 会 改变 
它 所 指向 的 原始 数据 。 


6.4.2 范 数 的 调用 


格式 1: varname= 函数 名 (实际 参数 ) ”// 有 返回 值 时 使 

格式 2: 函数 名 (参数 值 ) /无 返回 值 时 使 用 

JavaScript 的 函数 采用 传 值 方式 进行 传递 ， 也 就 是 将 实 参 单 元 的 值 传递 给 形 参 单元 。 
【 例 6-9】 控制 一 行 中 显示 字符 的 最 大 长 度 


<script type="text/javascript"> 
function convert(str,n) { // 字 符 串 str 在 显示 时 最 长 限制 为 n 个 英文 字符 


var result=”; 
var count=0; 
Var ic; 
var len=str.length; 
i=0; 
while (i<len){ 
c= str.charAt(i); // 取 串 的 第 i 个 位 置 的 字符 
if (c.charCodeAt(0)<299) ”// 根 据 字符 编码 判断 是 否 为 汉字 
count+=1; // 英 文字 符 
else 
count+=2; // 中 文字 符 


result = result+c; 
if (count>=n) { 
result+="..."; // 如 果 超 出 长 度 n， 则 用 省 略 号 代替 


break; 
} 
ij=i+1; 
} 


return result; 


} 

</script> 

【说 明 】 此 函数 在 显示 网 页 动态 内 容 时 有 用 ， 它 可 以 实现 列表 项 内 容 的 整齐 排列 ， 否 
则 会 造成 有 的 行内 容 可 能 很 长 ， 从 而 影响 整个 页 面 的 显示 排列 效果 。 网 络 教 学 系统 中 导航 菜 
单 的 显示 就 利用 了 该 函数 进行 显示 处 理 ， 另 外 还 有 一 些 网 站 新 闻 标 题 的 显示 也 可 能 会 用 到 。 


6.5 用 户 自 定义 对 象 


用 户 可 以 自 定义 对 象 ， 为 对 象 定义 属性 和 方法 。JavaScript 的 对 象 是 无 类 别 的 ， 它 对 属 
性 的 名 字 和 值 没 有 约束 。 另 外 ，JavaScript 对 象 的 属性 和 方法 还 可 以 动态 增 、 删 。 
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6.5.1 自 定 义 对 象 创建 方 式 


1. 对 象 字面 量 〈 也 称 对 和 象 初始 化 器 ) 
在 JavaScript 中 ， 对 象 是 “名 / 值 ”对 的 集合 。 对 象 字面 量 是 一 个 名 值 对 列表 ， 每 个 名 
值 对 之 间 用 逗号 分 隔 ， 并 用 一 个 大 括号 括 起 。 定 义 格式 如 下 : 
objectName = { 
propertyl:valuel, 
property2:value2, 


propertyN:valueN 
} 
其 中 ,各 名 值 对 表示 对 象 的 一 个 属性 ， 名 和 值 之 间 用 一 个 冒号 分 阳 。property 代表 对 象 
的 属性 名 ，value 则 是 对 象 的 属性 值 ， 值 可 以 是 字符 串 、 数 字 或 对 象 三 者 之 一 。 
例如 : 
<script type="text/javascript"> 
var user ={ 
name: "Smith", 
age: "24" 
} 


alert(user.age); 
</script> 


2. 构造 函数 方式 
通过 function 定义 编写 一 个 构造 函数 ， 并 通过 new 方式 来 创建 对 象 ， 例 如 : 


function User(name,age){ 

this.name=name; 

this.age=age; 
b 
var oneuser = new User(); 
其 中 ，this 是 对 当前 对 象 的 引用 。 
值得 一 提 的 是 ，JavaScript 对 象 的 属性 和 方法 是 动态 可 扩展 的 。 对 于 已 经 实例 化 的 对 象 

obj， 还 可 以 动态 增加 和 删除 它 的 属性 与 方法 。 
(1) 动态 增加 对 象 属性 


obj.newPropertyName=value; 


(2) 动态 增加 对 象 方法 
形式 1: 
obj.newMethodName = method ”//method 为 一 个 对 象 外 已 经 存在 的 方法 
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形式 2: 

obj.newMethodName = function(arg1,…,argN){ } 
(3) 动态 删除 对 象 属性 

delete obj.propertyName 
(4) 动态 删除 对 象 方法 

delete obj.methodName 


6.5.2 JavaScript 对 象 的 操作 


JavaScript 提供 了 几 个 用 于 操作 对 象 的 语句 、 关 键 字 及 运算 符 。 
1.，for…in 语句 
JavaScript 提供 了 一 种 特别 的 循环 方式 来 遍历 一 个 对 象 的 所 有 属性 。 其 语法 格式 如 下 : 
For( 对 象 属性 名 称 in 已 知 对 象 名 称 ) 
【 例 6-10】 遍历 对 象 的 所 有 属性 
2 -----eX6-10 .htm-- 一 -一 
<script type="text/javascript"> 
var myObject = new Object(); 
myObject.sitename = "DZF 学 练 园地 "; // 动 态 增加 属性 


myObject.siteurl = "cai.ecjtujx.cn ; 
for (prop in myObject) 


{ 
document.write(" 属 性 "+ prop + ”为 “+ myObject[prop]); 
document.write("<br>"); 

i 

</script> 


【说 明 】for…in 语句 自动 地 获取 对 象 的 每 个 属性 名 为 prop 变量 赋值 ， 而 myObject[prop] 

则 获取 对 应 的 属性 值 。 

2. with 语句 

其 语法 格式 如 下 : 

with (object) {****** } 

所 有 在 with 语句 后 大 括号 中 的 语句 都 是 在 后 面 object 对 象 作用 域 中 的 。 下 面 的 代码 段 显示 
两 种 访问 HTML 表单 的 元 素 的 方法 。 方 法 1 是 普通 的 方法 ， 方 法 2 是 使 用 with 语句 的 方法 。 

方法 1: 


frames[1].document.forms[0].address.value 
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方法 2: 


with (frames[1].document.forms[0]) { 
address.value = ""; 
name.value = ”; 


} 
一 般 情况 下 ， 方 法 2 用 在 需要 批量 访问 一 个 对 象 的 属性 或 方法 的 地 方 。 


6.5.3 定义 对 象 属性 


在 JavaScript 中 可 以 为 对 象 定义 3 种 类 型 的 属性 ， 即 私有 属性 、 实 例 属 性 和 类 属性 ， 
与 Java 类 似 ， 私 有 属性 只 能 在 对 象 内 部 使 用 ， 实 例 属 性 必须 通过 对 象 的 实例 进行 引用 ， 而 
类 属性 通过 类 名 进行 引用 。 
1. 定义 私有 属性 
私有 属性 只 能 在 构造 函数 内 部 定义 与 使 用 。 
语法 格式 : var propertyName=value; 
例如 : 
function User(age){ 
this.age = age; 
var isChild = age<12; /lisChild 为 私有 属性 
this.isLittleChild = isChild; 
} 


Var user = new User(15); 
alert(user.isLittleChild); // 正 确 的 方式 
alert(user.isChild); // 报 错 ， 对 象 不 支持 此 属性 


2. 定义 实例 属性 
定义 实例 属性 存在 3 种 方式 。 
(1) 原型 (prototype) 方式 
在 JavaScript 中 ， 函 数 就 是 对 象 ， 每 个 对 象 实例 包括 一 个 指向 该 原型 属性 和 方法 的 
prototype 属性 ， 可 以 用 它 为 原型 的 对 象 指定 属性 和 方法 。 
语法 格式 : functionName.prototype.propertyName = value 
例如 : 
function User(){ } 
User.prototype.name = " 张 三 "; 
User.prototype.age = 18; 
Var user = new User(); 
alert(user.age); 


(2) this 方式 
语法 格式 : this.propertyName = value 
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例如 : 


function User(name,age){ 
this.name = name; 
this.age = age; 

} 

user1 = new User(" 李 四 ",25) 

alert(user1.age); 


(3) 下 标 (index) 方式 


语法 格式 : obj[index] = value 


例如 : 


function User(name){ 
this.name = name; 
this.age = 18; 
this[1] = "ok"; 
} 
Var user2 = new User(" 王 五 "); 
alert(user2.name); 
alert(user2[1]); 


【注意 】 通 过 index 方式 定义 的 必须 使 用 index 方式 来 引用 ， 


义 的 则 必须 以 正常 方式 引用 。 
3， 定义 类 属性 


语法 格式 ;functionName.propertyName = value 


例如 : 


function User(){ } 
User.MAX_AGE = 200; 
User.MIN_AGE = 0; 
alert(User.MAX_AGE); 


6.5.4 定义 对 象 方法 


/lthis 方式 定义 


/lindex 方式 定义 


// 正 常 方式 引用 
/lindex 方式 引用 


/类 属性 定义 
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而 没有 通过 index 方式 定 


在 JavaScript 中 可 以 为 对 象 定义 3 种 类 型 的 方法 ， 即 私有 方法 、 实 例 方法 和 类 方法 。 
与 Java 类 似 ， 私 有 方法 只 能 在 对 象 内 部 使 用 ， 实 例 方法 必须 在 对 象 实例 化 后 才能 使 用 ， 类 


方法 必须 通过 类 名 使 用 。 
1. 定义 私有 方法 


私有 方法 必须 在 构造 函数 体内 定义 ， 而 且 只 能 在 构造 函数 体内 使 用 。 


语法 格式 : function methodName(arg1,…,argN){ } 


例如 : 


function User(name}{ 
this.name=name; 
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function getNameLength(nameStr)}{ /私有 方法 
return nameStr.length; 
| 
this.nameLength = getNameLength(this.name); 
} 


2. 定义 实例 方法 

定义 实例 方法 可 以 有 多 种 方式 。 

(1) this 方式 。 在 构造 函数 内 部 使 用 ， 语 法 格式 有 以 下 两 种 。 
形式 1: this.methodName = method: 
形式 2: this.methodName = function(argl,…,areN){ }; 
在 以 上 语法 描述 中 ，method 代表 外 部 的 一 个 方法 ，methodName 是 要 定义 的 对 象 的 方 
法 ， 形 式 1 的 含义 是 将 外 部 的 一 个 方法 直接 赋 给 对 象 的 某 个 方法 。 

【注意 】 在 JavaScript 等 式 右 边 直 接 写 方法 名 表示 引用 一 个 已 定义 的 方法 。 
(2) prototype 方式 。 在 构造 函数 外 部 使 用 ， 语 法 格式 以 下 两 种 。 
形式 1: functionName.prototype.methodName = method : 
EE 式 2: functionName.prototype.methodName = function(arg1,…:areN){ }:; 


【 例 6-11】 对 象 方法 的 定义 形式 


< -----eX6-11.htm---- 一 -一 -一 -一 -一 
<script language="javascript"> 
function User(name){ 
this.name=name; 
this.getName = function(){ /lthis 方式 的 形式 2 
return name; 


上 


} 
User.prototype.show = say; /prototype 方式 的 形式 
function say(someobj) { // 显 示 对 象 someobj 的 所 有 成 员 
for (k in someobj) 
document.write(k+"<br>") 


i 

obj = new User(" 张 三 "); 
document.write(obj.getName()+"<br>"); 
obj.show(obj); 

</script> 


在 浏览 器 中 查看 文件 ， 页 面 显示 结果 如 下 : 
张 三 


name 


getName 
show 
【注意 】 方 法 的 内 外 放置 不 是 任意 的 , 需 根据 方法 要 访问 的 数据 决定 。 上面 的 getName 
方法 不 能 采用 引用 外 部 方法 的 形式 ， 否 则 将 无 法 访问 对 象 的 name 属性 。 


形式 。 
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<script type= "text/javascript > 
var user ={ 


getName:function() { 


al37s 
(3) 对 象 字面 量 形式 。 对 象 字面 量 提供 了 一 种 非常 方便 地 定义 对 象 属性 及 方法 的 表示 
name: "Smith", 
return this.name; 


// 定 义 name 属性 
/定义 getName 方法 
setName:function(name) { 
this.name=name; 
j 


// 定 义 setName 方法 
user.setName("Mary"); // 使 用 setName 方法 
alert(user.getName()); /使 用 getName 方法 
</script> 
【说 明 】 在 对 象 字面 量 定 义 时 , 名 值 之 间 用 
3. 定义 类 方法 


是 号/ 
月 了 


用 。 


分 隔 , 各 数据 项 或 方法 之 间 用 去 号 分 隔 。 

类 方法 需要 在 构造 函数 外 部 定义 ， 且 以 构造 函数 名 作为 前 绥 。 语 法 格式 有 以 下 两 种 。 
形式 1: functionName.methodName = method; 

形式 2: functionName.methodName = function(argl,…,argN){ }:; 


【注意 】 类 属性 与 方法 可 以 在 任何 地 方 通过 类 名 来 使 用 ， 但 不 能 通过 对 象 的 实例 来 引 
这 一 点 与 Java 不 同 ， 在 Java 中 静态 成 员 可 以 通过 实例 来 访问 。 
页 面 显示 更 改 。 该 部 分 内 容 将 在 第 8 章 中 进行 详细 介绍 。 


最 后 要 说 明 的 是 ，JavaScript 的 一 个 重要 应 用 是 根据 事件 驱动 执行 脚本 代码 ， 进 而 实现 
本 章 小 结 


JavaScript 是 客户 端 编程 广泛 使 用 的 脚本 


语言 ， 


赋值 的 数据 类 型 。JavaScript 是 一 种 基于 对 象 的 


对 象 的 使 用 , 还 有 自 定义 函数 与 自 定义 对 象 的 操作 访问 方法 。JavaScript 的 变量 类 型 取决 于 
人 
第 10 章 中 还 将 介绍 JavaScript 的 高 级 应 用 。 


1. 选择 题 


本 章 主 要 介绍 了 其 基本 语法 成 分 、 内 置 
吾 言 ， 其 定义 对 象 的 形式 与 Java 有 较 大 的 
不 同 ， 定 义 对 象 的 形式 有 多 种 ， 而 且 对 象 的 属性 和 方法 可 以 动态 增加 和 删除 。 在 第 8 章 和 


(1) JavaScript 的 数据 类 型 主要 有 


法 
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A. 字符 串 值 B. 整数 C. 浮 点 数 
D. 逻辑 值 E. 布尔 值 


(2) 关于 变量 的 命名 规则 ， 下 列 说 法 正确 的 是 ys 
A. 首 字 符 必须 是 大 写 、 小 写 的 字母 、 下 划 线 (_) 或 美元 符号 〈$) 
B. 后 续 的 字符 可 以 是 字母 、 数 字 、 下 划 线 或 美元 符号 
C. 变量 名 称 不 能 是 保留 字 
D. 长 度 是 任意 的 
E. 区 分 大 小 写 
(3) 有关 JavaScript 语句 ， 下 列 说 法 正确 的 是 光志 
A. 单行 注释 语句 是 在 需要 注释 的 行 前 面 加 // 
.多 行 注 释 语句 是 在 需要 注释 的 文字 两 端 加 /* 注释 文字 */ 
.with 语句 的 功能 是 为 一 段 程序 建立 默认 对 象 
. JavaScript 中 没有 直 …else 语句 
.JavaScript 中 只 有 while 语句 ， 而 没有 do…while 语句 
(4) 以 下 生成 对 象 的 方法 中 ， 正 确 的 是 〈 和 


.VarZ=hew Boolean(a); 


四 已 口 台 


. Var str = "JavaScript"; 
. frut=new Array(3); 
. todayl=new Date(2008,10,1); 
today=new Date("October 1,2008"); 
一 个 表达 式 的 值 ， 可 以 使 用 的 函数 有 his 
eval( B. isNaNO 
. parseInt() D. parseFloat() 
关于 JavaScript 函数 ， 下 列 说 法 正确 的 是 站 
函数 是 独立 于 主 程序 的 、 具 有 特定 功能 的 一 段 程序 代码 块 
.函数 可 以 不 用 function 关键 字 
.函数 的 命名 规则 同 变 量 的 命名 规则 一 样 
.函数 必须 使 用 retum 语句 
. 函数 在 调用 时 直接 用 函数 名 ， 并 为 形式 参数 赋值 
在 JavaScript 中 ， 用 于 产生 输出 的 是 ys 
A. document.write() B. window.write() 
C. document.confirm() D. write "The Undefined Function" 
下 列 ( ) 是 获得 某 时 间 对 象 的 月 份 的 方法 getMonth0 的 特点 。 
获取 的 月 份 是 从 1 开始 计数 的 
获取 的 月 份 是 从 0 开始 计数 的 
获取 的 月 份 是 英文 单词 的 缩写 ， 如 6 月 份 为 Jan 
无 法 获取 月 份 


《39 
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2. 设计 题 

(1) 根据 时 间 段 的 不 同 ， 在 网 页 中 显示 不 同 的 问候 语 ， 若 时 间 在 12 点 以 前 ， 则 输出 
“早上 好 ! ”的 问候 语 ， 颜 色 为 绿色 ; 若 时 间 在 12 一 18 点 ， 则 输出 “下 午 好 ! ”的 问候 语 ， 
颜色 为 黄色 ; 若 时 间 在 18 点 以 后 则 输出 “晚上 好 ! ”的 问候 语 ， 颜 色 为 黑色 。 

(2) 编写 一 个 JavaScript 程序 ， 在 页 面 上 通过 输入 对 话 框 出 10 道 两 位 数 的 加 法 练习 
题 ， 车 用 户 回 答 正 确 ， 则 加 10 分 ， 最 后 用 对 话 框 显示 用 户 得 分 。 

(3) 以 下 程序 在 页 面 上 动态 显示 当前 时 间 ， 将 程序 补充 完整 。 

<html> 

<head> 


<title> 动 态 显示 日 期 时 间 </title> 
<script type="text/javascript"> 


function show(){ 


Var =new Date(); 

Var y,m,date,day,hs,ms,ss,theDateStr; 

y=today. ® _,; //4 位 整数 表示 的 年 份 
m= today.getMonth(); /月 

date= today_、 由 上 UB 

day= today.getDay(); // 星 期 

hs= today.getHours(); /时 


回 =today.getMinutes(); /分 
ss= today.getSeconds();// 秒 
x.innerHTML = y+" 年 "+ _(@)_+" 月 "+date+" 日 星期 "+days[day]+" "+hs+":"+ms+":"+Sss; 
window.setTimeout(__® _,1000); 
bh 
1 
</head> 
<body onLoad="show()"> 
<div id="x"></div> 
</body> 
</html> 


(4) 利用 JavaScript 实现 一 个 人 与 计算 机 对 拿 火 柴 的 游戏 。 火 此 数量 用 随机 函数 产生 ， 


范围 是 30 一 100 根 之 间 ， 每 次 限 拿 数量 为 3 根 ， 谁 先 拿 也 由 随机 数 决定 ， 拿 到 最 后 一 根 火 
柴 的 为 胜 者 。 利 用 prompt 函数 提示 用 户 输入 ; 利用 alert 函数 显示 结果 。 
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CSS 的 全 名 是 Cascading Style Sheets， 即 “ 层 合 样式 表 ”,， 简称 样式 表 ， 用 来 定义 网 页 
的 显示 样式 。 在 HIML 中 ， 网 页 内 容 和 网 页 样式 是 混 为 一 体 的 ， 如 果 想 修改 某 个 网 页 的 样 
式 ， 就 需要 对 该 网 页 进行 逐 名 修改， 非常 麻烦 。 单 纯 使 用 HIML 的 标记 和 属性 ， 有 时 达 不 
到 需要 的 效果 。 层 合 样 式 表 是 一 系列 格式 设置 规则 ， 使 用 CSS 可 以 灵活 控制 页 面 外 观 ， 包 
括 从 精确 的 布局 定位 到 特定 的 字体 和 样式 。 它 提供 了 便利 的 更 新 功能 ， 当 更 新 某 CSS 样式 
时 ， 使 用 该 样式 的 所 有 文档 的 格式 都 会 自动 更 新 为 新 样式 。 


7.1 样式 表 的 定义 与 引用 


CSS 格式 设置 规则 由 选择 器 和 声明 两 部 分 组 成 。 选择 嚣 是 标识 格式 元 素 的 术语 , HTML 
中 的 所 有 标记 都 可 以 作为 选择 器 ， 如 p、td 等 ， 另 外 ， 选 择 器 还 可 以 用 class 和 id 选择 符 来 
表示 。 声 明 用 于 定义 元 素 样式 ， 它 由 属性 和 值 两 部 分 组 成 。CSS 语法 的 一 般 格式 如 下 : 
选择 符 { 属性 : 属性 值 ; 属性 : 属性 值 ;…} 
例如 : 
h1{ color:red;font-family: 宋 体 } 
1， 标记 选择 符 
标记 选择 符 是 指 以 HTML 标记 作为 名 称 的 选择 符 ， 如 body、p、tr、hl 等 。 通 过 CSS 
可 以 重新 定义 这 些 标记 的 显示 样式 , 如 p 选择 符 就 可 以 定义 页 面 中 所 有 <p> 标 记 的 样式 风格 。 
对 于 标记 选择 符 定义 的 样式 ， 只 要 在 网 页 中 有 这 些 标记 ， 这 些 标记 就 会 自动 按照 CSS 
样式 的 风格 显示 。 
例如 ， 以 下 代码 段 定 义 了 <hl> 标 记 的 字体 大 小 和 字体 颜色 。 
<style type="text/css"> 
h1{ 
font-size: 18px; 
color: #F600FF; 
bh 


</style> 
【注意 】 在 使 用 标记 选择 符 时 ， 如 果 标 记 的 某 些 属性 在 CSS 中 没有 定义 ， 则 标记 就 会 
继承 原 有 的 属性 ， 就 如 本 例 中 的 hl、h2、h3 标记 中 没有 定义 字体 为 粗 体 ,但 是 字体 显示 的 
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2. class 选择 符 

使 用 类 选择 符 定义 样式 有 以 下 两 种 形式 。 

形式 1: 标记 名 .类 名 {规则 1; 规则 2; …} 

形式 2: .类 名 {规则 1; 规则 2; …} 

第 一 种 形式 定义 的 样式 只 能 应 用 于 指定 名 称 的 标记 上 ， 例 如 : 

p.back{background-color:#888888;} 

只 能 在 p 标 记 上 应 用 样式 ， 为 标记 加 入 class 属性 。 例 如 : 

<p class="back"> 这 上 段 文字 的 背景 色 应 用 了 样式 </p> 

第 二 种 形式 定义 的 样式 则 不 受 限 制 ， 可 应 用 于 所 有 标记 。 例 如 : 

.red{ font-size:12px;color:red;font-family: 宋 体 } 

同样 可 以 为 p 标记 应 用 该 样式 。 例 如 : 

<p class="red"> 使 用 class 选择 符 </p> 

【应 用 技巧 】 如 果 使 用 了 标记 选择 符 ， 则 可 以 使 用 类 选择 符 去 改变 个 别 已 定义 了 样式 
的 标记 选择 符 的 样式 。 

3. id 选择 符 

id 选择 符 用 于 定义 一 个 元 素 独 有 的 样式 ， 它 与 类 选择 符 的 区 别 在 于 ，id 选择 符 在 一 个 
HTML 文件 中 只 能 使 用 一 次 ， 而 类 选择 符 可 以 多 次 引用 。id 选择 符 定义 的 格式 如 下 : 

#id 名 {规则 1; 规则 2; …} 

例如 : 


#red{font-size:12px;color:red;font-family: 宋 体 } 

要 为 某 个 标记 应 用 该 样式 ， 需 要 在 标记 中 加 入 id 属性 ， 属 性 值 为 指定 的 id 名 。 例 如 : 
<p id="red"> 应 用 id 选择 符 </p> 

4. 上 下 文选 择 符 

上 下 文选 择 符 定义 柑 套 标记 的 样式 ， 标 记 中 间 加 空格 分 开 。 例 如 : 

td p {font-size:12px;color:red;font-family: 宋 体 } 

表示 在 HTML 文档 中 出 现 嵌 套 标记 <td><p>…</p></td> 的 地 方 引用 该 样式 。 例 如 : 
<table><tr><td><p> 由 套 标 记 的 样式 使 用 </p></td></tr></table> 


S. 和 群 定义 
多 个 选择 符 要 定义 同样 的 样式 ， 可 以 用 去 号 分 隔 。 例 如 : 


p,h1,a {font-size:12px;color:red;font-family: 宋 体 } 
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群 组 选择 符 可 以 简化 CSS 的 编写 ， 使 用 群 组 选择 符 可 以 定义 多 个 相同 样式 的 标记 选择 
符 。 本 例 中 的 hl、p、a 具有 相同 的 样式 ， 如 果 想 使 网 页 中 的 几 个 p 标记 显示 出 其 他 样式 ， 
可 以 采用 上 下 文选 择 符 的 方法 。 

6. 伪 类 

伪 类 是 特殊 的 类 ， 它 可 以 被 支持 CSS 的 浏览 器 自动 识别 ， 根 据 标 记 的 状态 自动 应 用 样 
式 。 需 要 注意 的 是 ， 伪 类 不 能 用 class 属性 来 指定 。 伪 类 定义 的 格式 如 下 : 

选择 符 : 伪 类 {规则 1; 规则 2; …} 

伪 类 最 常见 的 应 用 是 超 链 接 (a 标记 ), 超 链接 有 各 种 访问 状态 , 包括 已 访问 链接 (visited 
link) 、 可 激活 链接 (active link) 等 。 例 如 : 

ailink {color: #FF0000} 人 * 未 被 访问 的 链接 红色 */ 

a:visited {color: #00FF00} 六 已 被 访问 过 的 链接 绿色 */ 


a:hover {color: #FFCC00} ”/* 鼠标 悬浮 在 上 的 链接 柑 色 */ 
aiactive {color: #0000FF} ”/* 鼠标 点 中 激活 的 链接 蓝 色 */ 


【注意 】 由 于 CSS 优先 级 的 关系 后面 比 前 面 的 优先 级 高 )， 在 写 a 的 CSS 时, 一 定 
要 按照 alink、a:visited、a:hover、a:actived 的 顺序 书写 。 


7.2 样式 表 的 种 类 


CSS 按 其 位 置 可 以 分 为 内 嵌 样 式 、 内 部 样式 表 和 外 部 样式 表 3 种 。 

1. 内 婴 样 式 

内 棋 样 式 是 写 在 HIML 标记 中 的 ， 只 对 所 在 的 标记 有 效 。 其 语法 格式 如 下 : 
< 标记 style=" 属 性 : 属性 值 ; 属性 : 属性 值 ; …">…</ 标 记 > 

例如 : 

<P style="font-size:20pt; color:red">…</p> 


该 样式 定义 <p></p> 中 的 文字 是 20pt 字体 ， 字 体 颜 色 是 红色 。 

【应 用 技巧 】 一 般 情 况 下 ， 当 浏览 器 显示 表格 中 的 内 容 时 ， 各 单元 格 显示 的 实际 宽度 
依赖 表格 内 容 变 化 ， 而 在 动态 网 页 中 ， 数 据 信息 的 长 度 也 是 变化 的 。 为 了 让 表格 显示 时 有 
一 个 固定 宽度 ， 同 时 让 内 容 在 显示 超 宽 时 自动 转行 ， 可 进行 如 下 设置 : 
首先 在 表格 标记 中 设置 样式 style="table-layout:fixed", 然后 在 某 单元 格 标 记 中 设置 样式 
style='word-wrap:break-word'。 那 么 ， 这 个 单元 格 就 不 会 因 内 容 太 多 而 延长 表格 宽度 ， 从 而 
保证 了 页 面 显示 效果 的 整齐 。 

2. 内 部 样式 表 
内 部 样式 表 在 HTML 的 <head></head> 内 定义 ， 只 对 所 在 的 网 页 有 效 。 在 FrontPage 中 
创建 内 部 样式 ， 选 择 “ 格 式 ” 一 “样式 ”命令 ， 可 弹出 如 图 7-1 所 示 的 对 话 框 ， 在 该 对 话 
框 中 可 新 建 和 修改 样式 。 
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【 例 7-1】 内 部 样式 表 的 定义 与 使 用 


上 i ‘ex7-1.htm: 和 本 
<HTML> 
<HEAD> 
<STYLE type="text/css"> 
H1.mylayout {border-width:1; border:solid; text-align:center color:red} 
</STYLE> 
</HEAD> 
<BODY> 
<H1 class="mylayout"> 这 个 标题 使 用 了 样式 。</H1> 
<H1> 这 个 标题 没有 使 用 样式 。</H1> 
</BODY> 
</HTML> 


运行 结果 如 图 7-2 所 示 。 


Es 
boay 字符 预览 
button 
ant 一 补 软 卓越 AaBbcc 一 nD\exT-l. hte - Wicrosoft Internet KAplorer =lolx) 
加 | | 文 御 中 编辑 如 查看 轴 。 收 臣 人 工具 多 帮助 0D | 
四 加 eT Mio Dm 
列表 中 击 “ 新 建 ” 按 包 可 他 肝 一 个 新 的 自 定 义 样式 ~ 
这 个 标题 没有 使 用 样式 。 
加 
[BE ml EL 到 
图 7-1 【样式 】 对 话 框 图 7-2 内 部 样式 表 的 使 用 


【说 明 】 若 FrontPage 中 某 个 标记 要 应 用 样式 ， 需 要 进入 代码 视图 进行 文字 输入 设置 。 

3， 外 部 样式 表 

将 样式 定义 保存 到 一 个 以 .css 为 后 级 的 文件 中 ， 然 后 在 每 个 需要 用 到 这 些 样式 的 网 页 
中 引用 这 个 CSS 文件 。 例 如 ， 将 以 下 样式 保存 到 文件 my.css 中 : 


H1.mylayout {border-width: 1; border: solid; text-align: center;color:red} 
然后 在 网 页 的 头 部 使 用 link 标记 链接 到 外 部 样式 文件 ， 代 码 如 下 : 


<HTML> 

<HEAD> 

<link href="my.css" rel="stylesheet" type="text/css"> 
</HEAD> 

<BODY> 

<H1 class="mylayout"> 这 个 标题 使 用 了 Style。</H1> 
<H1> 这 个 标题 没有 使 用 Style。</H1> 

</BODY> 

</HTML> 
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【注意 】 

(1) CSS 文件 中 不 包括 <style> 标 记 ，<style> 标 记 是 HTML 标记 ， 而 不 是 CSS 样式 标记 。 

(2) 外 部 调用 CSS 时 要 注意 文件 的 链接 路 径 。 

在 FrontPage 中 创建 样式 表 文 件 ， 选 择 “ 文 件 ” 一 “新 建 ” 命 令 ， 然 后 选择 “其 他 网 页 
模板 ”， 将 得 到 如 图 7-3 所 示 的 对 话 框 ， 选 择 “ 样 式 表 ”选项 卡 。 单 击 “ 普 通 样式 表 ” 可 
进入 样式 表 文 件 的 编辑 视图 。 按 照 前 面 介 绍 的 内 部 样式 表 的 创建 过 程 进行 样式 的 设计 ， 建 
好 的 样式 将 存储 在 样式 表 文 件 中 。 

在 FrontPage 中 ， 若 某 个 网 页 要 引用 外 部 样式 ， 可 选择 “格式 ”一 “样式 表 链 接 ” 命 令 ， 
将 弹出 如 图 7-4 所 示 的 对 话 框 。 在 该 对 话 框 中 添加 选取 文件 。 


司 
窜 规 | 他 梁 由 页 者 式 机 站 


加 加 加 加 攻 
-一 一 一 EE 
内 可 击 于 机 SW 图 力 决 eT a 4 
加 辐 架 说 明 Ji 的 MG) 
图 国 图 国 一 个 空 日 区 村 式 表 ， 


[条 商业 到 诗歌 檀 采 


图 7-3 “外 部 样式 表 文 件 创建 模板 选择 对 话 框 图 7-4 链接 样式 表 的 选取 对 话 框 

使 用 外 部 样式 表 的 优点 如 下 : 

(1) 样式 代码 可 以 复 用 。 一 个 外 部 CSS 文件 可 以 被 很 多 网 页 共用 。 

(2) 便于 修改 。 如 果 要 修改 样式 ， 只 需要 修改 CSS 文件 ， 而 不 需要 修改 每 个 网 页 。 

(3) 可 以 提高 网 页 显示 的 速度 。 如 果 样 式 写 在 网 页 中 ,会 降低 网 页 显示 的 速度 :如果 
网 页 引用 一 个 CSS 文件 ， 则 该 CSS 文件 多 半 已 经 在 缓存 区 中 《其 他 网 页 早已 引用 过 它 ) ， 
网 页 显示 的 速度 就 比较 快 。 
4. 样式 定义 选择 的 几 点 注意 事项 
(1) 如 果 为 少量 标记 添加 CSS， 可 以 采用 行内 定义 的 内 嵌 样 式 ， 如 果 只 为 一 个 网 页 文 
件 使 用 的 样式 ， 则 可 以 采用 在 文档 头 定义 的 内 部 样式 表 ， 如 果 为 众多 文件 使 用 的 样式 ， 则 
可 以 定义 外 部 样式 表 ， 通 过 外 部 链接 使 用 。 

(2) 若 文档 内 同时 存在 多 种 加 入 样式 的 方式 ， 则 内 嵌 样 式 优先 考虑 ， 在 <head> 标 记 处 
定义 的 内 部 样式 次 之 ， 外 部 样式 表 优 先 级 别 最 低 。 

(3) 为 了 方便 理解 CSS 代码 ， 可 以 写 CSS 代码 注释 。CSS 代码 注释 以 开头 ， 以 */ 
结束 。 例 如 : 


* 段落 样式 */ 
pf text-align: center;，/* 居中 显示 */ 
color: black; 


font-family: arial 


| 
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7.3 CSS 属性 


CSS 属性 可 分 为 字体 属性 、 文 本 属性 、 颜 色 和 背景 属性 、 方 框 属性 、 分 类 属性 和 定位 


下 3 


字体 属性 


字体 属性 用 于 设置 字体 的 名 称 、 大 小 、 显 示 风 格 等 。 


口 
口 
口 


口 
口 


口 


口 


font-family: 定义 字体 名 称 ， 如 .sl {font-family: 宋体 } 。 

font-size: 定义 字体 大 小 。 有 多 种 单位 表示 ， 最 常用 的 就 是 pt 和 px(pixel)。 
font-style: 定义 字体 风格 。 取 值 有 normal、italic、oblique， 其 中 ，normal 是 默认 
值 ，italic 和 oblique 均 为 斜体 显示 。 

font-weight: 定义 字体 浓淡 ， 取 值 有 normal (正常 ) 和 bold (加 粗 ) 。 
font-variant: 定义 变化 字体 ， 取 值 有 normal 和 small-caps，normal 是 默认 值 ， 
small-caps 表示 小 的 大 写字 体 。 

line-height: 定义 字体 的 行 高 。 其 值 可 以 按 单位 值 和 百分比 进行 设置 。 在 字体 的 综 
合 写法 中 为 可 选项 ， 用 斜 杠 符 与 font-size 分 隔 。 

font: 各 种 字体 属性 的 一 种 快捷 的 综合 写法 。 


各 项 的 排列 顺序 和 格式 为 [<font- style>||<font-variant>||<font-weight>]?<font-size>[/<line- 
height>]?<font-family>。 
例如 ，.sl {font:italic normal bold 11pt arial} 表 示 为 样式 sl 定义 的 字体 选用 Arial， 风 格 
为 斜体 ， 浓 淡 为 加 粗 ， 大 小 为 11pt，font-variant 为 normal。 
【 例 7-2】 字体 属性 使 用 演示 


<HEAD> 

<TITLE> 字 体 属性 用 法 </TITLE> 

<STYLE type=text/css> 

.S1 {font:italic normal bold 16pt arial} 

.S2 {font-family: 黑 体 ;font-size:24pt;font-weight:bold;color:red} 
.S3 {font-family: 黑 体 ;font-size:24pt;font-variant:small-caps} 
</STYLE> 

</HEAD> 

<BODY> 

<P class=s1>abcd 字体 演示 1</P> 

<P class=s2>abcd 字体 演示 2</P> 

<P class=s3>abcd 字体 演示 3</P> 

</BODY> 

</HTML> 
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运行 结果 如 图 7-5 所 示 。 


所 ] 字体 尾 性 用 法 - Microsoft Internet Exiiai 辣 
文件 编辑 (E) ”查看 (V) 收 蔽 地 ” 链 控 


abcd 关 供 菏 元 1 
abcd 字 体 演 示 2 
ABcD 字 体 演 示 3 


恒利 量 我 的 电脑 
图 7-5 字体 属性 
【说 明 】 本 例 在 同一 段 文字 上 用 不 同 的 风格 进行 显示 ,读者 可 对 照 效果 检查 具体 设置 。 
以 下 代码 通过 脚本 改变 页 面 上 某 个 层 中 的 字体 显示 大 小 。 
【 例 7-3】 通过 脚本 代码 控制 页 面 元 素 的 字体 大 小 


EX7-3.htm-- 一 > 
<script language="JavaScript" > 
function setFontSize(f,size) { /脚本 要 执行 的 函数 定义 
Var obj=document.getElementByld(f); 
obj.style.fontSize=size; 
上 
</script> 
<!-- ”控制 字体 大 小 的 超 链 接 --> 
【 <A href=javascript: setFontSize('text','15px') 大 </A> 
<A href=javascript: setFontSize('text','13px')> 中 </A> 
<A href=javascript: setFontSize('‘text',"11px')> 小 </A> 】 
< 上 -以 下 为 字体 大 小 受 控制 的 页 面 元 素 --> 


<div id='text> ...... <div> 


【说 明 】 单 击 超 链接 执行 脚本 函数 setFontSize， 改 变 id 标识 指定 元 素 的 字体 大 小 。 


7.3.2 文本 属性 


文本 属性 包括 设置 文本 的 对 齐 方式 、 修 饰 、 缩 进 以 及 行 高 和 间距 等 。 
口 textralign: 定义 文本 对 齐 方式 。 取 值 有 left( 居 左 , 默认 值 ) 、right ( 居 右 ) 、center 
(居中 ) 、justify (两 端 对 齐 )。 

口 text-decoration: 定义 文本 修饰 。 取 值 有 none (无 , 默认 值 ) 、underline (下 划 线 ) 、 
overline (上 划 线 ) 、line-through〔 中 间 划 线 )。 

口 ”text-indent: 定义 文本 缩 进 。 默 认 值 为 normal， 其 值 有 按 长 度 和 百分比 两 种 设 定 方 
法 。 按 长 度 设置 可 以 用 绝对 单位 (cm、mm、in、pt、pc) 或 相对 单位 (em、ex、 
px) ， 相 对 单位 指 相对 normal 情形 的 增 减 值 ， 按 百分比 设置 是 相当 于 父 对 和 象 宽度 
的 百分比 ， 父 对 象 就 是 外 层 标 记 。 

口 line-height: 定义 行 高 。 默 认 值 为 normal， 其 值 有 按 长 度 和 百分比 两 种 设 定 方法 。 


第 7 章 ， 层 三 样式 表 CSS “147。 


口 letter-spacing: 定义 字 间 距 。 默 认 值 为 normal， 其 值 有 按 长 度 和 百分比 两 种 设 定 方法 。 
口 text-transform: 定义 文本 的 变换 。 取 值 有 none (无 ， 默 认 值 ) 、capitalize〈 首 字 
母 大 写 ) 、uppercase (字母 转 大 写 ) 和 lowercase (字母 转 小 写 ) 。 


【 例 7-4】 文本 属性 样式 的 使 用 


>- -ex7-4.htm: - - - 2 
<HTML> 

<HEAD><TITLE> 文 本 属性 用 法 </TITLE> 

<STYLE type=text/css> 

H2.space { LETTER-SPACING: 5pt } 六 字符 间距 */ 


Pind{ 
COLOR: #CC6600; TEXT-INDENT: 20pt; 
BACKGROUND-COLOR: #BEFACA; 
font-size:24pt; font-family: 华 文 仿宋 ; font-weight:bold 


} 

H3.dec { TEXT-DECORATION: line-through } 记 删除 线 */ 
P.hei2 { LINE-HEIGHT: 32pt } 上 * 演示 行 间距 */ 
SPAN.super{ VERTICAL-ALIGN: super } /#* 上 标的 使 用 */ 
< 人 /STYLE> 

</HEAD> 

<BODY> 


<H2 class=space> 本 行 字 符 间 距 是 5pt</H2> 

<P class=ind> 本 段 文字 起 始 缩 进 20pt</P> 

<H3 class=dec> 本 行文 字 带 有 删除 线 。</H3> 

<P class=hei2> 本 行 与 下 一 行 间距 为 32pt，<BR> 本 行 的 X 和 YY 带 有 上 标 : X<SPAN 
class=super>3</SPAN>+Y <SPAN class=super>3</SPAN> </P> 

</BODY> 

</HTML> 


运行 结果 如 图 7-6 所 示 。 


er -lel 
EE TE ao | 
[7 7 TE ElSL] 
本 行 字 符 间 距 是 5pt 
本 段 文字 起 始 缩 进 20pt 
行文 字 拓 有 出 际 关 
木 行 与 下 一 行 问 下 为 32p， 
本 行 的 x 和 Y 过 有 上 标 ,XStY 
a 习 

司 痣 六 EE 


图 7-6 文本 属性 样式 演示 
7.3.3 颜色 和 背景 属 
口 backsground-color: ea 


口 background-image: 定义 背景 图 片 。 
口 background-repeat: 与 A 属性 一 起 使 用 ， 设 置 背 景 的 重复 。 其 中 
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repeat 为 默认 值 ， 沿 水 平和 竖 直 两 个 方向 重复 ; repeat-x 表示 背景 图 片 横向 重复 ; 

repeat-y 表示 背景 图 片 竖 向 重复 ;no-repeat 表示 背景 图 片 不 重复 。 
口 “background-attachment: 与 background-image 属性 一 起 使 用 ， 决 定 图 片 是 跟随 内 容 
滚动 还 是 固定 不 动 。 有 两 个 值 ， 一 个 是 scroll (滚动 ) ， 另 一 个 是 fixed〈 固 定 ) 。 
默认 值 是 scroll。 
口 ”background-position: 与 background-image 属性 一 起 使 用 ， 决 定 背 景 图 片 的 最 初 位 

置 。 有 按 百 分 比 定位 ， 也 有 按 偏 移 像素 值 定位 。 默 认 值 为 0%， 该 值 代表 左上 角 为 
【提示 】 在 Firefox 和 Opera 中 需要 把 background-attachment 属性 设置 为 "fixed"， 只 有 
这 样 才能 保证 该 属性 正常 工作 。 

以 下 为 背景 设置 的 简单 举例 : 

body 


{ background-color:#99FF00;background-image:url(background.jpg);background-repeat:no-repeat; 
background-position:20px 60px} 


表示 背景 图 片 的 初始 位 置 距离 网 页 最 左 端 20px， 距离 网 页 最 上 端 60px。 当 背景 图 片 不 
存在 时 以 背景 颜色 设置 背景 。 

口 background: 背景 相关 属性 的 快捷 综合 写法 。 例 如 : 

body {background:#99FF00 url(background.jpg) no-repeat fixed 40px 100px} 

以 下 样式 可 使 页 面 的 背景 图 案 在 文字 “滚动 ”时 静止 不 动 。 


<style type="text/css"> 
BODY { background: purple url(bg.jpg); 
background-repeat:repeat-y; 
background-attachment:fixed 
} 


</style> 
不 仅 整 个 网 页 存在 背景 ， 网 页 的 众多 元 素 ， 如 表格 、 单 元 格 等 均 可 设置 背景 样式 。 另 
外 ， 在 后 面 的 样 例 中 还 将 看 到 用 背景 填充 层 、 列 表 项 的 情形 。 


7.3.4 列表 属性 


列表 属性 用 于 设置 列表 标记 (<oP> 和 <ul>) 的 显示 特性 ， 包 括 类 型 、 位 置 、 列 表 图 片 等 。 

口 list-style-type: 定义 列表 样式 类 型 。 取 值 有 disc (默认 值 ， 黑 圆 点 ) 、circle〈 空 心 

圆 点 ) 、square (小 黑 方块 ) 、decimal (数字 排序 ) 、lower-roman (小写 罗马 字 
排序 ) 、upper-roman (大 写 罗马 字 排 序 ) 、loweralpha (小 写字 母 排序 ) 、upper-alpha 
(大 写字 母 排 序 ) 、none 〈 无 列表 项 标记 ) 。 

口 list-style-position: 定义 列表 样式 位 置 。 取 值 有 outside 〈 以 列表 项 内 容 为 准 对 齐 ) 、 
inside〈 以 列表 项 标记 为 准 对 齐 ) 。 
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口 list-style-image: 定义 列表 样式 图 片 。 例 如 : 
ulflist-style-image: url(../images/circle.gif)} 

口 list-style: 为 列表 样式 的 快捷 综合 写法 。 例 如 : 
ulflist-style:circle inside url(images/flow.gif)} 


如 果 想 无 任何 风格 ， 则 可 用 list-style :none。 


7.3.5 边框 、 边 距 和 间隙 属性 


1. 边框 属性 
边框 属性 用 于 设置 边框 的 宽度 、 风 格 、 颜 色 。 设 置 方式 较 多 ， 上 下 左右 4 个 边框 既 可 
以 统一 设 定 ， 也 可 以 分 开设 定 。 
(1) 设置 边框 宽度 的 属性 
border-top-width、border-bottom-width、border-left-width、border-right-width 属性 用 于 
设置 元 素 上 、 下 、 左 、 右 边框 的 宽度 , 具体 取 值 可 通过 常量 或 长 度 单位 决定 。 常量 有 medium 
(默认 值 ， 中 等 ) 、thin ( 细 ) 、thick( 粗 ) ， 长 度 单位 可 以 用 绝对 单位 (cm、mm、in、 
pt、pc) 或 相对 单位 (em、ex、px) 。 
(2) 设 定 边框 风格 
通过 border-style 属性 设置 ， 取 值 有 none (没有 边框 ) 、hidden (隐藏 〉》、dotted (点 
线 ) 、dashed〔 破 折线 ) 、solid (直线 ) 、double ( 双 线 ) 、groove ( 凹 槽 )、ridge〈 突 兰 ) 、 
inset〈 内 陷 ) 、outset (外 突 ) 。 
(3) 设 定 边框 颜色 
border-top-color、border-bottom-color、border-left-color、border-right-color 属性 用 于 设 
定 上 、 下 、 左 、 右 边框 的 颜色 。 
(4) 边框 属性 的 快捷 综合 写法 
边框 属性 还 给 出 了 边框 设置 的 快捷 综合 写法 ， 它 包含 用 border-width、border-style 和 
border-color 分 别 设置 边框 的 宽度 、 风 格 和 颜色 。 
例如 ， 以 下 定义 img2 的 样式 设置 : 
.img2{ 
border-style:double; 
border-color:red; 
border-width:3px; 
} 
快捷 综合 写法 可 以 简写 成 : 
.img2{ border: 3px red double;} 


另外 ， 还 可 以 通过 border-top、border-bottom、border-left 和 border-right 分 别 设置 上 、 
下 、 左 、 右 边框 的 宽度 、 样 式 和 颜色 。 


“150 。 Web 编程 实践 教程 


2. 边 距 属性 

边 距 属性 用 来 设置 页 面 中 一 个 元 素 所 占 空间 的 边缘 到 相 邻 元 素 之 间 的 距离 。 具 体 属性 
有 margin-top、margin-bottom、margin-left、margin-right， 它 们 分 别 用 来 设置 上 、 下 、 左 、 
右边 距 。 例 如 : 

.d1{margin-left:1cm} 

另外 ， 还 提供 有 Margin 属性 为 设 定 边 距 宽度 的 快捷 综合 写法 。 例 如 : 

.d1 {margin:1cm 2cm 3cm 4cm} 

设置 上 边 距 为 ecm， 右边 距 为 2cm， 下 边 距 为 3cm， 左 边 距 为 4cm。 

3， 间 阶 属 性 

间 际 属性 (padding〉 用 来 设置 元 素 内 容 到 元 素 边界 的 距离 。 具 体 属性 有 padding-top 、 
margin-bottom、padding-left、padding-right， 它 们 分 别 用 来 设置 上 、 下 、 左 、 右 间 际 。 属 性 
的 取 值 如 表 7-1 所 示 。 


表 7-1 padding 属性 的 取 值 情形 


由 浏览 器 计算 间隙 
规定 以 具体 单位 计算 的 间隙 值 ， 如 像素 、 厘 米 等 。 默 认 值 为 0px 
规定 基于 父 元 素 的 宽度 的 百分比 的 内 边 距 
规定 间隙 从 父 元 素 继承 


另外 ， 还 提供 有 padding 属性 为 设 定 间 际 宽度 的 快捷 综合 写法 。 

以 下 为 用 综合 写法 设置 间隙 的 一 些 例子 ， 单 位 均 为 px。 

口 padding:10px 5px 15px 20px: 表 示 上 、 右 、 下 、 左 的 间隙 为 10、5、15、20。 

口 、padding:10px 5px 15px; 表示 上 、 右 、 下 、 左 的 间隙 为 10、5、15、5。 

口 padding:10px 5px; 表示 上 、 下 的 间隙 为 10， 左 、 夺 的 间隙 为 5。 

口 padding:10px; 表示 上 、 下 、 左 、 右 的 间 除 均 为 10。 

CSS 中 还 有 一 个 重要 的 概念 ， 即 盒子 模式 ， 如 图 7-7 所 示 。 盒 子 中 由 外 至 里 依次 是 边 
距 (margin) 、 边 框 (border) 、 间 际 (padding) 、 内 容 部 分 (有 width 和 height 属性 ) 。 


border 

1 

1 

1 

1 
机 height 
padding CSS fr 子 模 式 1 margin 

避 莽 | 

1 
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1 

= 一 width 一 一 一- 一 一 一 一 > 


图 7-7 CSS 盒子 模式 
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边 距 属性 (margin) 是 元 素 所 占 空间 的 边缘 到 相 邻 元 素 之 间 的 距离 ; 边框 属性 (border) 
设 定 一 个 元 素 的 边线 ;间隙 属性 (padding) 设置 元 素 内 容 到 元 素 边框 的 距离 ; 背景 属性 指 
的 是 内 容 〈 虚 线 框 住 的 部 分 ) 和 padding 区 域 。 元 素 的 width 和 height 属性 指 的 是 内 容 区 
域 的 宽 和 高 。 
【 例 7-5】 一 个 通用 的 报错 页 面 设计 


一 一 ----error-asp- 一 

<html> 

<head> 

<style> 

body{text-align:center;padding-top:50px;} 

#error{ background-image:url(error.png);width:430px;height:240px; 
text-align:left;} 

#error pt{ font-size:9pt;margin-top:114px:; 
color:#333;margin-left:120px;width:265px;line-height:22px} 


</style> 
</head> 
<body> 
<div id="error"><p><%=request("mess")%></p></div> 
</body> 
</html> 


【说 明 】 仔 细 体 会 各 元 素 的 样式 设置 ， 尤 其 是 盒子 模式 的 应 用 。 该 程序 可 用 于 网 站 的 
统一 报错 界面 。 在 需要 报错 时 ， 可 重 定向 到 该 页 面 ， 通 过 URL 参数 传递 报错 信息 ， 例 如 : 
Response.Redircet("error.asp?mess="&" 本 课程 不 允许 学 生 上 传 文件 ， 请 教师 联系 管理 员 ! ") 

对 应 产生 的 访问 结果 如 图 7-8 所 示 。 
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图 7-8 网 站 的 统一 报错 页 面 


7.3.6 ”定位 与 布局 属性 


1. 定位 属性 
CSS 提供 了 二 维和 三 维 空间 定位 的 属性 ， 即 top、left 和 position。 可 利用 它们 定位 某 个 
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元 素 的 绝对 位 置 或 相对 于 其 他 元 素 的 相对 位 置 。 
(1) top、left 和 position 属性 
口 top 属性 用 于 设置 元 素 与 窗口 上 端的 距离 。 
口 left 属性 用 于 设置 元 素 与 窗口 左 端的 距离 。 
口 ”position 属性 用 于 设置 元 素 位 置 的 模式 ， 它 有 以 下 3 种 取 值 。 
急 ” absolute: 绝对 位 置 , 原点 在 所 属 块 元 素 的 左上 角 。 使 用 left、 right、 top、bottom 
等 属性 相对 于 其 最 接近 的 一 个 有 定位 设置 的 父 对 象 进行 绝对 定位 。 如 果 不 存 
在 这 样 的 父 对 象 ， 则 依据 body 对 象 。 
急 relative: 相对 位 置 ， 相 对 于 HTML 文件 中 本 元 素 的 前 一 个 元 素 的 位 置 。 
会 static: 静态 位 置 ， 按 照 HTML 文件 中 元 素 的 先后 顺序 显示 。 
position 属性 的 默认 值 为 static。top 、left 属性 通常 与 position 属性 配合 使 用 。 
(2) 三 维 空间 定位 
CSS 允许 在 三 维 空间 中 定位 元 素 ， 与 之 相关 的 属性 是 z-index， 它 与 top、left 属性 结合 
使 用 。 z-index 将 页 面 中 的 元 素 分 成 多 个 “ 层 ”， 可 形成 多 个 层 “ 堆 营 ” 的 三 维 效 果 。z-index 
取 值 为 整数 ， 可 为 正 ， 也 可 为 负 ， 取 值 越 大 表示 在 堆 合 层 中 处 于 的 位 置 越 高 ，0 是 基准 值 。 
【 例 7-6】 三 维 定位 属性 用 法 
和 ---eX7-6.htm------ 一 -一 
<HTML><HEAD><TITLE> 三 维 定位 属性 用 法 </TITLE> 
<STYLE type=text/css> 
SPAN { FONT-SIZE: 18pt} 
SPAN.level2{ 


Z-INDEX: 4; COLOR: #0000ff; 
font-size:36pt 


} 
SPAN.level1 { 
Z-INDEX: 2; COLOR: #AOE1F1; 
font-size:36pt 


1 
SPANL.level0{ 
COLOR:#A5BDA4; font-size:36pt 
} 
</STYLE> 
</HEAD> 
<BODY> 
<SPAN class=level2 style="position: absolute; left: 30px; top: 19px"> 
立体 字 效 果 </SPAN> 
<SPAN class=level1 style="position: absolute; left: 32px; top: 21px"> 
立体 字 效 果 </SPAN> 
<SPAN class=level0 style="position: absolute; left: 34px; top: 23px"> 
立体 字 效 果 </SPAN> 
</BODY> 
</HTML> 
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运行 结果 如 图 7-9 所 示 ， 形 成 了 立体 字 的 效果 。 


EE 
| 文件 四 编辑 EE) 查看 WD 收 豪 扩 ) 工 皇 > | 链接 | Ee 


[地址 @) | 名] nD: \ex7-7 htm BSE 


立体 字 效 果 


图 7-9 定位 属性 的 使 


2. foat (浮动 ) 属性 

float 属性 用 于 页 面 元 素 的 布局 设置 。 取 值 有 none (默认 值 ， 对 象 不 浮动 ) 、left (对 象 
问 左 浮动 )、right (对象 向 右 浮 动 )。float 属性 和 position 属性 的 区 别 在 于 ，float 是 相对 
定位 的 ， 会 随 着 浏览 器 的 大 小 和 分 辨 率 的 变化 而 改变 ， 而 position 则 不 会 。 所 以 在 一 般 情 
况 下 采用 float 进行 布局 ， 在 局 部 可 能 会 用 到 position 进行 定位 。 
【 例 7-7】 利用 浮动 定位 实现 菜单 栏 

文件 1: HTML 文件 


eX7-7 htm 
<html> 
<head> 
<link rel="stylesheet" type="text/css" href="menustyle.css"> 
</head> 
<body> 
<div id="menu" > 
<Ul> 
<li><a href="like_search.asp"> 个 性 化 推荐 </a></li> 
<li><a href="paper_search.asp"> 学 生 文章 推荐 </a></li> 
<li><a href="#'" class=current> 教 学 课件 推荐 </a></li> 
<li><a href="internet_search.asp">Internet 资源 </a></li> 
</ul> 
</div> 
</body> 
</HTML> 


和 ---menustyle.css-------- 一 -一 -一 
#menu {height: 28; } 
#menuyu ul{ 

margin:0; /* 将 menu UL 的 边 距 和 间隙 均 置 为 0 */ 

padding:0; 

list-style-type:none ; 
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#menu li{ 
display:block; 
float:left: 广 向 左 浮动 定位 */ 
border-right:1px solid ##ffffff: 
background-image:url(images/button bg5.gif); 


yi 

#menu li a{ 
display:block; /* 定义 为 块 元 素 ， 以 便 背 景 能 完整 覆盖 列表 项 */ 
text-decoration:none; /* 超 链接 无 下 划 线 */ 
line-height:28px; 
padding:0 28px; /* 上 下 间隙 为 0， 左右 间隙 为 28*/ 

} 

#menu li a:hover{ 
color:red; 
background-position: 0% 0%; ”背景 从 列表 项 块 的 左上 方 开 始 */ 
background-image:url(images/button_bg.gif); 

} 


#menu lia.current{ 
background-position: 0% 0%; 
background-image:url(images/button_bg.gif); 
| 


【说 明 】 本 例 将 每 个 列表 项 采用 向 左 浮动 布局 ， 如 图 7-10 中 右边 的 上 方 一 排 菜单 所 示 。 
第 一 个 列表 项 布 署 在 层 menu 的 最 左边 ， 第 二 个 列表 项 顺序 在 其 右边 排列 ， 这 样 依次 排列 
形成 美观 的 选项 菜单 。 


soft Internet Ezplorer Ed] 
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re 到 中 | 9l 


图 7-10 浮动 定位 的 应 用 ( 右 下 框架 中 菜单 项 ) 


3. 设置 可 见 性 

设置 可 见 性 有 display 属性 和 visibility 属性 。 以 下 为 display 属性 的 3 个 常见 值 。 

口 block: 块 对 象 的 默认 值 。 

口 none: 隐藏 对 象 。 与 visibility 属性 的 hidden 值 不 同 ， 不 能 为 被 隐藏 的 对 象 保留 空 
间 ， 也 就 是 说 页 面 上 其 他 内 容 将 填充 隐藏 元 素 所 占 的 空间 。 
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口 inline: 内 联 对 象 的 默认 值 。 

网 页 的 可 视 文 档 对 象 分 为 块 对 象 (block) 和 内 联 对 象 (inline) 。 例 如 ，div 是 一 个 块 
对 象 ，span 是 一 个 内 联 对 象 。 块 对 象 的 特征 是 从 新 的 一 行 开 始 且 能 包含 其 他 块 对 象 和 内 联 
对 象 。 内 联 对 象 显示 时 不 会 从 新 行 开 始 ， 它 只 能 容纳 文本 或 其 他 内 联 对 象 。block 对 象 的 
高 度 、 行 高 以 及 顶 和 底 边 距 都 可 控制 ，inline 对 象 的 高 度 、 行 高 以 及 项 和 底 边 距 不 可 改变 。 
例 7-7 中 将 列表 项 (1i) 定义 为 block 对象 ， 这 样 背景 填充 时 可 占 满 项 目 空间 。 

在 网 页 中 可 通过 脚本 代码 隐藏 某 个 元 素 。 例 如 : 


someid.style.display='none'。 


最 后 要 指出 的 是 ，CSS 还 包含 其 他 一 些 属性 ， 读 者 可 通过 阅读 相关 书籍 进行 了 解 ， 限 
于 篇 幅 ， 这 里 不 再 展开 介绍 。 


本 章 小结 


CSS 样式 在 网 页 设计 中 应 用 广泛 。 本 章 介绍 了 CSS 样式 的 定义 与 使 用 的 相关 知识 ， 
括 样式 表 的 种 类 、 样 式 的 定义 与 引用 方式 ， 并 结合 实例 介绍 了 典型 CSS 属性 的 应 用 形式 。 


习题 
1. 选择 题 


(1) 要 将 下 面 代码 的 超 链接 文本 显示 为 红色 ， 不 能 使 用 的 样式 表 是 〈 和 
<div><a href="http://www.w3.org/"> 链 接 到 W3C</a></div> 


A. ailink{ color:red } B. div a:link{f color:red } 

C. div>a:link{ color:red } D. div:first-child{ color:red } 
(2) 使 用 CSS 设置 格式 时 ，p em{colorblue } 表 示 ( 和 

A. p 元 素 内 的 em 元 素 为 蓝 色 B. Pp 元 素 内 的 元 素 为 蓝 色 

C. em 元 素 内 的 p 元 素 为 蓝 色 D. em 元素 内 的 元 素 为 蓝 色 
(3) 下 列 选项 中 能 够 实现 层 的 隐藏 的 是 和 

A. display:false B. display:hidden 

C. display:none D. display:" " 
(4) 下 列 选项 中 能 够 产生 带 有 正方 形 项 目的 列表 的 是 ( Fs 

A. list-type: square B. type:2 

C. type: square D. list-style-type: square 


(5) 下 列 选项 中 能 够 去 掉 文本 超 链接 的 下 划 线 的 是 (  )。 


A. a {text-decoration:no underline} B. a {underline:none} 
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C. a {decoration:no underline} D. a {text-decoration:none} 
(6) 下 列 选项 中 能 够 设置 英文 首 字 母 大 写 的 是 ) 。 

A. text-transform:uppercase B. text-transform:capitalize 

C. 样式 表 做 不 到 D. text-decoration:none 
(7) CSS 中 的 选择 器 包括 (  ) 。 

A. 超 文本 标记 选择 器 B. 类 选择 器 

C. 标签 选择 器 D. ID 选择 器 
(8) 在 CSS 文本 属性 中 ， 文 本 对 齐 属性 的 取 值 有 (  )。 

A. auto B. justify C. center 

D. right E. left 
(9) 在 CSS 中 ， 盒 模型 的 属性 包括 〈 hie 

A. font B. margin C. padding 

D. visible E. border 


(10) 下 面 关 于 CSS 的 说 法 正确 的 是 ( 六 
A. CSS 可 以 控制 网 页 背景 图 片 
B. margin 属性 的 属性 值 可 以 是 百分比 
C. 整个 BODY 可 以 作为 一 个 BOX 
D. 可 以 使 用 word-spacing 属性 对 中 文 的 字 间 距 进 行 调整 
E. margin 属性 不 能 同时 设置 4 个 边 的 边 距 
(11) 在 HTML 文档 中 ， 引 用 外 部 样式 表 的 正确 位 置 是 〈 js 


A. 文档 的 末尾 B. 文档 的 顶部 
C. <body> 部 分 D. <head> 部 分 

(12) 下 列 选项 中 能 够 在 CSS 文件 中 插入 注释 的 是 ( ) 。 
A. /this is a comment B. V/Wthis is a comment // 
C. /*thisisacomment*/ D. ‘thisis a comment 

(13) 在 以 下 选项 中 ， 可 使 所 有 <p> 元 素 变 为 粗 体 的 正确 语法 是 ye 
A. <p style="font-size:bold"> B. <p style="text-size:bold"> 
C. p {font-weight:bold} D. p {text-size:bold} 


(14) 设置 边框 时 ， 要 求 上 边框 10 像素 、 下 边框 5 像素 、 左 边框 20 像素 、 右 边框 1 
像素 ， 下 面 选 项 中 满足 条 件 的 是 光志 

A. border-width:10px Spx 20px lpx B. border-width:l10px 20px 5px lpx 

C. border-width:Spx 20px 10px lpx D. border-width:10px lpx Spx 20px 
(15) 如 果 将 两 个 层 排列 在 同一 行 中 ， 下 列 描述 不 能 实现 的 是 sg 

A. 直接 插入 两 个 DIV 标记 ， 会 自动 排 在 同一 行 

B. 指定 DIV 的 position 属性 为 absolute， 然 后 将 层 位 置 拖 放 到 同一 行 中 

C. 指定 DIV 标记 的 宽 ， 并 且 指 定 其 浮动 方式 ， 当 层 宽度 之 和 小 于 外 层 元 素 宽 

度 时 ， 会 排 在 同一 行 
D. 使 用 一 个 表格 ， 将 两 个 层 分 别 放 入 一 行 中 的 两 个 单元 格 内 
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(16) 下 列 关于 元 素 在 网 页 中 又 放 顺 序 的 描述 ， 不 正确 的 是 和 
A. 使 用 CSS 属性 Z-INDEX 来 实现 县 放 顺序 
B. 属性 的 取 值 越 大 ， 表 示 放 置 的 层次 越 高 
C. 属性 取 值 可 以 为 负 整数 
D. 可 以 县 放 ， 但 炙 放 顺序 不 能 指定 ， 将 由 计算 机 随机 产生 
2. 问答 题 
(1) 总 结 CSS 样式 的 定义 与 引用 方式 ， 并 指出 其 作用 次 序 。 
(2) 根据 图 7-11 及 其 代码 ， 回 答 下 列 问 题 : 
中 “这 一 行 是 h3” 的 字体 大 小 是 多 少 ? 
@ “main 外 的 h2” 的 字体 大 小 是 多 少 ? 文字 是 什么 颜色 ? 
@@ “这 一 行 是 hl,hl 中 的 .s2” 的 字体 大 小 是 多 少 ? 文字 是 什么 颜色 ? 


EE 
文件 四 电 每 四 查看 Y) 收 蕊 人 工具 C) 帮助 0 


死 下 至 示 id "aain” 的 内 容 
main 中 的 h2 


这 一 行 是 h3 
应 用 了 .sl 

main 外 的 h2 

这 一 行 是 hl, hl 中 的 . s2 


图 7-11 CSS 选择 符 的 应 用 
图 7-11 对 应 的 代码 如 下 : 


<html><title>CSS 习题 </title> 
<style type="text/css"> 
<|-- 
#main { 
height: 150px; 
width: 400px:; 
border: 1px solid #000066; 
background-color: #ffffcc; 
padding-left: 20px; 
text-align: center; 
} 
.S1,#main h2{ 
font-size: 16px; 
line-height: 120%; 
color: #0000ff; 
} 
h3,h2,h1 { 
font-size: 30px; 
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line-height: 110%; 
color: #006600; 
} 


-> 
</style> 
</head> 
<body> 
<div id="main"> 
<p> 此 处 显示 id &quot;main&quot; 的 内 容 </p> 
<h2>main 中 的 h2</h2> 
<h3> 这 一 行 是 h3</h3> 
<p class="s1"> 应 用 了 .s1</p> 
</div> 
<h2>main 外 的 h2</h2> 
<h1> 这 一 行 是 h1,h1 中 的 .s2</h1> 
</body> 
</html> 


3. 设计 题 

(1) 设计 CSS 样式 表 ， 要 求 网 页 文字 内 容 显示 为 9pt， 行 距 为 130%， 颜 色 为 蓝 色 。 
表格 内 文本 显示 颜色 为 红色 ， 字 体 为 黑体 ， 大 小 为 24， 行 高 为 50 像素 。 超 链接 样式 为 : 

a:link-- 黑 体 36px， 颜 色 为 妇 33333， 

a:hover -- 黑 体 36px， 颜 色 为 性 F3300， 背 景 为 AYCCCCCC; 

aiactive -- 黑 体 36px， 颜 色 为 #999999， 背 景 为 #333333; 

aivisited-- 黑 体 36px， 下 划 线 为 “无 ”， 颜 色 为 黑色 。 

把 这 个 样式 表 保存 为 stylel.css， 建 立 两 个 HTML 文件 (pagel.htm 和 page2.htm) 应 用 该 
样式 。 网 页 中 包含 表格 、 超 链接 和 文字 ， 能 通过 超 链 接 从 pagel.htm 跳 转 到 page2.htm。 

(2) 图 7-12 所 示 为 网 络 教学 中 课程 的 教学 幻灯 片 文件 列表 页 面 。 利 用 层 的 样式 定义 
完成 图 中 的 方 框 界面 ， 标 题 部 分 的 背景 图 片 由 课程 教学 网 站 下 载 ， 该 背景 图 片 的 高 和 宽 很 
小 ， 用 背景 填充 层 时 只 在 x 方向 重复 。 幻灯 片 的 URL 文件 名 自己 假定 。 样 式 包括 颜色 、 文 
字 大 小 、 边 框 修饰 等 ， 超 链接 要 去 掉 下 划 线 。 


章节 菜单 导航 学 习 方式 - Wicreseft Tnternet Erplerer> 本 =|glxl 
| 文件 也， 编辑 EE) 查看 收 蕊 Q) 工具 GD) 帮助 0 | 正 习 
MW Ew /cdost/ stvdent_ao sp ESE2 
DT 片 囊 
沪 第 ! 章 及 第 2 童 
光 第 3 章 及 第 4 重 
及 第 5 章 及 第 5 章 
光 第 ? 章 坟 第 8 章 
Ed [iT [TT Onn 4 


图 7-12 ”网络 教学 中 课程 的 教学 幻灯 片 文件 列表 页 面 
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8.1 浏览 器 对 象 模型 


在 4.0 版 以 后 的 下 或 Netscape 浏览 器 都 是 对 象 化 的 ,浏览 器 本 身 就 由 许多 对 象 所 组 成 ， 
这 些 对 象 有 各 自 的 属性 、 方 法 和 事件 。 因 此 ， 网 页 设计 者 可 通过 脚本 程序 来 控制 或 调用 这 
些 对 象 。 目 前 ，Microsoft 和 Netscape 的 浏览 器 对 象 模型 都 是 以 W3C 所 公布 的 文档 对 象 模 
型 (Document Object Model，DOM) 为 基础 ， 再 加 上 扩展 对 象 而 成 的 。 

文档 对 象 模型 是 用 于 表示 HTML 元 素 以 及 Web 浏览 器 信息 的 一 个 模型 ， 它 提供 一 套 
表示 文档 结构 的 对 象 以 及 访问 这 些 对 象 的 方法 。DOM 是 一 种 Web 页 面 的 层次 或 树 型 结构 
表示 。 基 于 这 个 层次 结构 ， 还 可 以 创建 其 他 对 象 。 对 于 每 一 个 页 面 ， 浏 览 器 都 会 自动 创建 
window、document、location、navigator、history 等 对 象 。 


JavaScript 除了 可 以 访问 本 身 内 置 的 各 种 对 象 外 ,还 可 以 访问 浏览 器 提供 的 对 象 ， 从 而 


图 8-1 浏览 器 常用 对 象 的 依托 关系 
8.1.1 window 对 象 


window 对 象 描述 浏览 器 窗口 特征 , 它 是 document、location、history 等 对 象 的 依托 对 象 。 
1. window 对 象 的 属性 
口 “frames[]: 为 子 帧 数组 , 每 个 数组 元 素 代表 一 个 框架 , 按 源 文档 中 定义 的 顺序 存放 。 
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方法 


【 例 


frames.length 为 子 帧 个 数 。 

self: 代表 当前 窗口 。 

parent: 代表 父 窗 口 (当前 窗口 是 其 中 一 个 子 窗口 )。 

top: 代表 项 层 窗口 (是 所 有 可 见 窗口 的 父 窗 口 》。 

status: 为 浏览 器 状态 栏 上 的 消息 。 

defaultStatus: 当 status 无 效 时 ， 出 现在 浏览 器 状态 窗口 上 的 默认 消息 。 

name: 窗 体 的 内 部 名 称 ， 用 window.open() 方 法 打开 的 窗口 定义 的 名 字 。 

closed: 可 以 判断 一 个 窗口 是 否 已 经 被 关闭 。 

opener: 通过 该 属性 可 以 从 一 个 窗口 操纵 它 的 父 窗口 。 
从 一 个 窗口 打开 另外 一 个 窗口 后 ， 子 窗口 通过 opener 属性 访问 父 窗口 ， 而 通过 open0 
I 返回 值 , 父 窗 口 可 以 和 子 窗口 发 生 联 系 , 这 样 两 个 相关 的 窗口 之 间 就 可 以 实现 互 操作 。 
例如 ， 以 下 例题 先 建立 一 个 弹出 窗口 ， 通 过 opener 属性 可 以 获取 父 窗口 的 属性 信息 。 
8-1】 弹出 窗口 的 使 用 举例 
文件 1 (x.htm) 


此 OoooOoOOoOoOo 


<script language="javascript"> 
popup = window.open("tan.htm","popupnav",width=225,height=235, 
resizable=1,scrollbars="auto ); 
window.name =" 测 试 opener 属性 "; 
</script> 
<BODY> 父 窗 体 页 面 </BODY> 


文件 2 (tan.htm) 


<HTML><BODY> 子 窗 体 页 面 <p> 
<a href="javascript:alert(window.opener.name)"> 看 父 窗口 的 名 称 </a> 
</BODY></HTML> 


2. window 对 象 的 方法 
(1) 与 对 话 框 有 关 的 方法 
口 alert("message"): 功能 是 弹出 一 个 警告 枉 ， 在 警告 框 内 显示 字符 串 文 本 。 
口 confirm("message"): 显示 含有 给 定 消息 的 确认 对 话 框 (有 一 个 OK 按钮 和 一 个 
Cancel 按钮 )， 如 果 用 户 单 击 OK 按钮 ， 返 回 True， 和 否则 返回 False。 
口 “prompt("message"): 显示 一 个 提示 输入 对 话 框 ， 要 求 用 户 根 据 显 示 消息 给 予 相 应 
的 输入 。 


【 例 8-2】 3 种 对 话 框 的 使 用 样 例 


> - - - -ex8-2.htm- - - 
<script language="javascript"> 

name=”; 

name=window.prompt(" 请 输入 你 的 姓名 : ,name); 
window.alert(namet+" 你 好 ! 下 面 要 开始 考试 了 !); 

if (window.confirm(" 你 确实 准备 好 了 吗 ?"){ 
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window.location.href="exam.asp"; 
中 
</script> 


【 例 8-3】 用 户 登 录 检 查 程序 的 设计 
文件 1: 登录 页 面 


-MYylOgiN.htMm----— 
<CENTER> 
<form action="usercheck.asp” method="post"> 
<DIV style="FILTER: dropshadow(color=#888888,offx=10,offy=10,positive=1); WIDTH:215px; 
HEIGHT: 102px"> 
<TABLE height="96%" cellPadding=3 width="97%" 
bgcolor="#F1FAFE" border=0 style="border-collapse: collapse"> 

<TR> 
<TD align=center width="100%" colspan="2" bgcolor="#DDFOFF" > 

<p align="center"><font color="#0000FF"> 用 户 登 录 </font></TD> 
</TR> <TR> 
<TD align=right width="40%" ><big> 登 录 名 </big></TD> 
<TD align=center width="60%"> <INPUT type="text" size="12" name="Username"> 
</TD> 
</TR> <TR> 
<TD align=right width="40%" ><big> 口 &nbsp; 令 </big></TD> 
<TD align=center width="60%"> <INPUT type="password" size="12" name="password"> </TD> </TR> 
</TABLE></DIV> 
<p><input border=0 name=enter src="images/btn_login.gif" type=image> 
</form> 
</CENTER> 


【说 明 】 该 页 面 设计 时 将 表格 (TABLE) 嵌 套 在 一 个 层 (DIV) 中， 通过 层 的 样式 设 
定形 成 阴影 效果 。 运行 结果 如 图 8-2 所 示 。 该 页 面 提供 了 一 个 登录 表单 , 其 中 包括 usemame 
和 password 两 个 文本 输入 框 。 


al 对 
| 文件 四 连 稀 芭 ) 查看 YW) 收藏 ”| | 链接 韦 

| 建 直 四 | 多] http://loeuhosvyeylogin hu 可 加 到 
习 


用 户 和 录 


图 8-2 登录 页 面 
文件 2: 登录 验证 程序 


< 一 -Usercheck.asp--- 一 -一 -一 -一 -一 一- 一- 一- 一 
<% 

User=request.form("username") 

pass = request.form("password") 
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if instr(user,”"")>0 or instr(pass,"")>0 then 
response.write " <script>alert(' 用 户 名 或 密码 非法 ! '); 
window.location.href='mylogin.htm';</script>" 
response.end 
end if 
file="data.mdb" 
connstr="driver={Microsoft Access Driver (*.mdb)}:dbq="&Server.MapPath(file) 
Set Conn=Server.CreateObject("ADODB.connection") 
Conn.Open connstr "连接 数据 库 
sql="select * from userTable where userid="&user&" and password="&pass&"”" 
"检查 用 户 名 和 密码 是 否 正确 
set rs=Conn.execute(sql) 
ifrs.EOF then "记录 集 是 否 为 空 
response.write "<script>alert(' 用 户 名 或 密码 错误 ! ");" 
response.write "history.back();</script>" 
else 
conn.close 
response.cookies("username")=user 
response.redirect("mainpage.asp") 
end if %> 


【说 明 】 

@ 本 例 结合 了 服务 器 端 和 客户 端 两 方面 的 脚本 编程 技术 。 在 Response 对 象 输出 的 响 
应 信息 中 含有 在 客户 端 执行 的 JavaScript 脚 本 代码 。 先 执行 服务 器 端 脚本 代码 ,输出 的 HITP 
响应 消息 中 含有 的 客户 端 脚本 代码 将 在 客户 端 解释 执行 。 

@ 为 了 防止 SQL 注入 攻击 ， 在 用 户 名 或 密码 输入 中 不 允许 出 现 撒 号 。 因 此 ， 程 序 中 
安排 了 一 条 站 语句 进行 检查 ， 如 果 含 有 撒 号 ， 则 在 响应 页 面 中 通过 执行 JavaScript 脚本 程 
序 弹出 对 话 框 指示 错误 性 质 ， 并 利用 window.location.href 的 赋值 重 定向 到 登录 页 面 。 这 里 
需 注 意 response.end 的 作用 。 

@ 正常 登录 将 检查 数据 库 表 格 中 是 否 有 用 户 名 和 密码 匹配 的 用 户 ， 如果 存 在 ， 则 将 用 
户 身份 记录 在 Cookie 变量 中 并 转向 正常 页 面 ， 和 否则 ， 将 通过 执行 JavaScript 脚本 程序 弹出 
对 话 框 指示 错误 ， 并 用 history 对 象 的 back0 方 法 让 用 户 重新 回 到 登录 界面 。 

【思考 】 本 例 在 服务 器 端 检 查 用 户 名 和 密码 是 否 合法 是 否 可 以 在 客户 方 进行 ? 

(2) 与 窗口 打开 和 关闭 有 关 的 方法 

口 ”open() 方 法 : 打开 一 个 窗口 ， 并 指定 窗口 的 风格 。 语 法 格式 如 下 : 

open("URL","WindowName"[, 窗 口 风格 ]); 

其 中 ，URL 指定 要 打开 的 文件 页 面 地 址 ，WindowName 指定 新 窗 体 的 命名 ，“ 窗 口 风格 ” 
为 可 选 参数 ， 它 可 以 指定 浏览 器 是 否 具有 toolbar (工具 栏 ) 、location (地 址 栏 )、directories 

(目录 按钮 ) 、status 〈 状 态 栏 ) 、menubar (菜单 条 ) 、scrollbars (滚动 条 ) 等 ， 它 们 可 
以 设置 为 yes 或 no， 同 时 窗口 风格 也 可 以 指定 浏览 器 窗口 的 width 〈 宽 ) 和 height〈 高 ) 。 
open 方法 可 返回 一 个 打开 窗口 的 引用 值 ， 以 后 可 用 该 引用 值 去 代表 窗 体 对 象 。 例 如 : 


nw = open("URL","WindowName"); 


秒 。 
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口 close() 方 法 : 关闭 窗口 ， 如 nw.close();。 

(3) 与 超时 有 关 的 方法 

口 ”setTimeonut 方法 : 创建 定时 器 。 语 法 格式 如 下 : 

setTimeout("expression", time) 

其 中 ， 参 数 expression 是 一 个 表达 式 ， 通 常 为 函数 调用 ;time 是 一 个 整数 ， 单 位 为 毫 
该 函数 的 作用 是 经 过 指定 的 毫秒 后 ， 自 动 执行 expression 的 内 容 。 

口 ”clearTimeout 方法 : 清除 指定 的 定时 器 。 语 法 格式 如 下 : 

clearTimeout(timeID) 

其 中 ，timeID 为 setTimeout 方法 的 返回 标志 。 

另 一 组 用 来 进行 定时 设置 与 取消 的 函数 是 setInterval 和 clearInterval， 它 们 的 用 法 和 参 


数 形态 与 setTimeout 和 clearTimeout 完全 一 致 。 


【 例 8-4】 简单 时 钟 显示 控制 


<script language="JavaScript"> 
var timer; 
function clock() { 
var timestr=""; 
var now = new Date(); 
var hours = now.getHours(); 
var minutes = now.getMinutes(); 
var seconds = now.getSeconds(); 
timestr += hours; 
timestr += ((minutes<10)? ":0" +minutes; 
timestr += ((seconds<10)? ":0" : ":")+seconds; 
window.document.frmclock.txttime.value=timestr; 
timer = setTimeout('clock()'",1000);”// 设 置 定时 器 


function stopit() { clearTimeout(timer); } 

</script> 

</head> 

<body> 

<form action="" method="post" name="frmclock" id="frmclock"> 

<p> 当 前 时 间 : <input name="txttime" type="text" id="txttime"></p> 
<p><input type="button" name="Submit" value=" 启 动 时 钟 " onclick="clock()"> 
<input type="button" name="Submit2" value=" 停 止 时 钟 " onclick="stopit()"></p> 
</form> 

</body> 

</html> 


【说 明 】 这 里 对 clock 函数 的 调用 是 一 种 特殊 的 循环 往复 ， 也 就 是 通过 定时 器 反复 调 


自己 。 本 例 通 过 按钮 的 onclick 事件 触发 执行 脚本 函数 ,注意 对 文档 中 显示 时 间 的 输入 框 
的 访问 ， 可 以 通过 对 象 的 层次 路 径 访问 (window.document.frmclock.txttime) ， 也 可 以 直接 
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通过 id 名 访问 ， 因 为 它 在 页 面 上 是 唯一 的 ， 所 以 可 以 省 略 前 面 的 路 径 信息 。 
(4) 与 窗口 焦点 有 关 的 方法 


的 输入 ， 也 就 是 获得 了 焦点 ， 获 得 了 焦点 的 窗口 称 为 当前 窗口 。 通 过 如 下 方法 可 改变 当前 
窗口 。 

口 focus0: 让 窗口 获得 焦点 ， 如 nw.focus();。 

口 _blur0: 让 窗口 失去 焦点 ， 如 nw.blur0:。 


8.1.2 ” document 对 象 


document 对 象 代表 当前 页 面 文档 ， 因 此 ， 它 包含 着 当前 页 面 的 一 些 信息 ， 包 括 页 面 的 
前 景色 和 背景 色 以 及 页 面 中 的 表单 、 锚 标 、 图 像 等 对 象 。 运 用 document 对 象 可 以 动态 访问 
和 操纵 页 面 内 容 。 

页 面 中 的 所 有 对 象 都 与 顶级 对 象 document 有 关 ， 整 个 文档 表现 为 由 HIML 标记 的 堪 
套 层 次 构成 的 节点 树 。 从 节点 树 的 角度 来 看 ， 文 档 是 节点 的 集合 ， 节 点 是 文档 树 的 分 支 和 
叶子 。 

1. document 对 和 象 的 常用 属性 

(1) bgColor: 页 面 的 背景 色 。 

(2) fgColor: 页 面 的 前 景色 ， 即 文本 的 颜色 。 

(3) linkColor: 页 面 的 超 文本 链接 的 颜色 。 

(4) lastModified: 页 面 文件 的 最 后 修改 时 间 。 

(5) title: 页 面 的 标题 。 

(6) URL: 页 面 的 URL 地 址 。 

(7) forms[]: 表单 (form) 对 象 组 成 的 数组 ， 数 组 中 的 每 一 个 元 素 对 应 于 网 页 中 的 每 
一 个 <FORM> 标 记 ， 数 组 元 素 的 顺序 对 应 在 HTML 文件 代码 中 标记 出 现 的 先后 顺序 。 

(8) links[]: 超 文 本 链接 对 象 组 成 的 数组 ， 数 组 中 的 每 一 个 元 素 对 应 于 网 页 中 的 每 一 
个 <A> 标 记 ， 数 组 元 素 的 顺序 对 应 在 HTML 文件 代码 中 标记 出 现 的 先后 顺序 。 

(9) images[]: 文档 中 所 有 图 像 对 象 组 成 的 数组 ， 数 组 中 的 每 一 个 元 素 对 应 于 网 页 中 
的 每 一 个 <img> 标 记 ， 数 组 元 素 的 顺序 对 应 在 HIML 文件 代码 中 标记 出 现 的 先后 顺序 。 

(10) anchors[]: 文档 中 所 有 锚 对 象 组 成 的 数组 。 
【 例 8-5】 通过 document 对 象 设置 和 访问 页 面 的 属性 

ex8-5.htm- 本 


<html> 

<body> 

<script> 
document.bgColor="fefefe"; 
document.fgColor="green"; 
document.linkColor="#0088FF"; 
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document.alinkColor="#0088FF"; 

document.vlinkColor="#0088FF"; 

document.write("<h2> 通 过 document 对 象 设置 页 面 属性 示例 </h2>"); 
document.write("<a href='http://www.ecjtu.jx.cn'> 访 问 华 东 交 通 大 学 </a>"); 
document.write("<br><br> 本 页 面 的 URL 是 : "+document.URL); 
document.write("<br><br> 文 件 最 后 被 修改 时 间 是 : "+document.lastModified); 
</script> 

</body> 

</html> 


运行 结果 如 图 8-3 所 示 。 
2. document 对 象 的 方法 
口 “write 方法 : 用 于 在 文档 中 写 内容 。 语 法 格式 如 下 : 
write(Stringl],String2,°**); 
该 方法 的 参数 可 以 是 一 个 以 上 的 任意 个 字符 串 ， 如 果 参 数 不 是 字符 串 ， 则 将 自动 转化 
为 字符 串 。 常 用 一 个 参数 的 形式 ， 将 输出 内 容 用 + 号 拼接 在 一 起 。 例 如 : 
document.write("<br><br> 你 是 第 "+i+ "个 访问 者 "); 
口 ”writeln 方法 : 功能 同 write 方法 ， 只 是 在 输出 内 容 后 加 一 个 换行 符 。 
口 “open 方法 : 打开 一 个 已 存在 的 文档 或 创建 一 个 新 文档 来 写 入 内 容 ， 人 允许 的 文件 类 
型 包括 text/html、text/plain、image/gif、image/jpeg、xX-word/plug-in 等 。 


口 ”close 方法 : 用 于 关闭 文档 ， 以 后 用 document 写 入 的 内 容 将 成 为 一 个 新 文档 。 

口 。 getElementById(String): 返回 文档 中 具有 特定 ID 标识 的 对 象 。 

口 ”getElementsByName(String): 返回 文档 中 具有 某 名 称 的 所 有 HTML 元 素 对 象 的 集合 。 

口 ”getElementsByTagName(String): 返回 文档 中 符合 指定 标记 名 称 的 所 有 HTML 元 素 
对 象 的 集合 。 

【 例 8-6】 用 open 方法 打开 新 窗口 并 在 新 窗 体 页 面 填写 内 容 
一 Xt 
<html> 
<head> 


<script language="JavaScript"> 

function createWin(){ 
NewWin=window.open("™,"","width=200,height=200"); 
NewWin.document.open("text/htm!"); 
NewWin.document.write(" 这 是 新 创建 的 窗口 "); 
NewWin.document.close(); 

h 

</script> 

</head> 

<body> 按 下 按钮 可 弹出 一 个 窗口 <br> 

<form><input type="button" value=" 弹 出 新 窗口 " onClick="createWin()"></form> 

</body> 

</html> 
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运行 结果 如 图 8-4 所 示 。 


=/9x 
| 文件 四 ” 蝙 强 全 查看 WW) 收 若 D 工具 (TD) 帮助 人 0 正 台 
IT EE 


按 下 按钮 可 弹出 一 个 窗口 
弹出 新 窗口 


这 是 新 创建 的 窗口 1 


| 瑚 证 加 | 多] n ea-s htn 


通过 document 对 象 设置 页 面 属性 示例 


本 页 面 的 UR ile:;, 
文件 最 后 被 修改 时 间 是 


SE 厂 厂 厂矿 万 厅 疯 郴 国 卫 E2 三方 三 三 三 [有 
图 8-3 用 document 对 象 访问 和 设置 页 面 属 性 图 8-4 在 用 open 方法 打开 的 新 窗口 中 动态 书写 内 
【 例 8-7】 改变 同一 页 面 文档 的 内 容 


怠 


<script language="JavaScript"> 

function change() { 
document.open(); /创建 新 文档 
document.write("<p><font color=red> 新 文档 </font></p>"); 
document.close(); 

</script> 

</head> 

<body> 

<p> 旧 文档 </p><p><a href="#' onclick="change()"> 显 示 新 文档 </a></p> 

</body> 

</html> 


运行 结果 如 图 8-5 所 示 。 图 8-5 a) 所 示 为 旧 文 档 ， 图 8-5 (b) 所 示 为 更 改 后 的 页 面 。 


FETE lox) 
| 文件 中 编辑) 查看 WW) 收 ” 书 | 
| 地 址 名 | 多] 0: vexe-7 htn SDE | 天 十 四 | 色 ] n: vexa-7 htm SSE 


| 文档 新 文档 


加 
性 


STE 


(b) 
图 8-5 动态 改变 自己 页 面 的 内 容 


3. 访问 页 面 文档 的 元 素 
文档 对 象 模 型 将 网 页 中 的 元 素 都 看 作为 对 象 ， 整 个 页 面体 现 为 由 对 象 元 素 组 成 的 树 型 
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结构 , 为 了 便于 访问 , 可 以 为 页 面 中 需要 特别 访问 的 元 素 规定 标 


"67 


识 。 通常 用 id 属性 或 name 


属性 为 元 素 添加 标识 , 在 一 个 网 页 中 每 个 id 值 应 是 独一无二 的 。 在 脚本 中 可 以 通过 元 素 ID 
直接 引用 元 素 ， 也 可 以 通过 一 个 层次 路 径 访 问 元 素 ， 层 次 路 径 的 一 个 典型 表示 为 
DOCUMENT.ALL. 元 素 D. 属 性 。 如 果 元 素 中 有 一 个 id 名 ， 则 用 getElementById(id 名 ) 是 最 


简单 的 方法 。 
【 例 8-8】 计算 表达 式 的 值 


-一 -一 - -—---eX8-8.htm: 

<html> 

<head> 

<script language="javascript"> 

function calculate() { 
frmcalc.result.value=eval(frmcalc.expression.value); 

4 

</script> 

</head> 

<body> 

<form name="frmcalc" method="post" action=""> 


请 输入 要 计算 的 表达 式 : 


<input name="expression" id="expression" type="text" /> 
<br> 


表达 式 的 值 为 : 


<input name="result" id="result" type="text" /> 

<br> 

<br> 

<input type="button" value=" 计 算 ” onclick="calculate( )"/> 
</form> 

</body> 

</html> 


【运行 示例 】 用 浏览 器 打开 html 文件 ， 结 果 如 图 8-6 所 示 。 在 文本 框 expression 中 输 
入 任何 表达 式 ， 单 击 “ 计 算 ” 按 钮 ， 在 文本 框 result 中 将 可 以 看 到 计算 结果 。 


| 文件 中 编 名 中 查看 WD 收 京 W) 工具 CD 帮助 ) | 区 
EW En-\e-e ht EE 


请 输入 要 计算 的 表达 式 [3*2+14*5 
表达 式 的 值 为 。 Bo 


图 8-6 计算 表达 式 值 


【思考 】 直 接 通过 ID 访问 对 象 ， 程 序 应 如 何 修改 ? 用 getElementById 方法 又 应 如 何 写 ? 
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下 面 介绍 DHTML 页 面 设计 中 常用 的 两 个 页 面 标记 。 
(1) <span> 标 记 

<span> 标 记 是 随 着 CSS 的 产生 而 引入 的 标记 ， 增 加 该 标记 的 目的 是 给 出 样式 而 不 必 将 
样式 附加 到 原 有 HTML 标记 上 ， 另 外 ， 也 可 以 通过 更 改 标记 的 style 属性 改变 样式 。 以 下 
代码 定义 了 一 个 id 为 a2 的 span 标记 。 

<span id="a2"></span> 

用 如 下 语句 可 向 该 标记 中 写 入 内 容 。 

a2.innerText = XXX 

或 者 

a2.innerHTML = XXX 


所 有 HTML 元 素 都 有 innerHTML 属性 和 innerText 属性 ,innerHTML 与 innerText 之 间 
的 区 别 在 于 ，innerHTML 是 指 元 素 标签 问 的 所 有 内 容 〈 含 HTML 代码 ) ， 而 innerText 是 
指 元 素 标签 间 的 文本 内 容 。 
(2) <div> 标 记 
<div> 标 记 用 来 表示 层 ， 是 一 个 非常 灵活 的 标记 。<div> 是 块 级 元 素 ， 它 将 其 包含 的 内 
容 形成 一 个 独立 的 段落 ， 并 且 可 以 嵌 套 。 通 过 改变 层 的 style 属性 可 以 让 页 面 内 容 发 生 各 种 
效果 的 动态 变化 ， 通 过 改变 层 的 innerHTML 属性 可 改变 层 的 显示 内 容 。 


8.1.3 location 对 象 


该 对 象 包含 有 当前 网 页 的 URL (统一 资源 定位 器 ， 即 网 址 ) ， 其 属性 href 用 于 指定 导 
航 到 的 网 页 。 例 如 : 
<body> 


<a href=# onClick="Javascript:window.location.href='nextpage.asp"> 按 此 处 到 下 一 个 页 面 </a> 
</body> 


8.1.4 history 对 象 


该 对 象 包含 有 最 近 一 段 时 间 访 问 过 的 网 页 的 URL 地 址 列表 。 
机 history 对 象 的 属性 

current: 历史 中 当前 访问 项 的 URL。 

next: 下 一 个 历史 项 的 URL。 

previous: 上 一 个 历史 项 的 URL。 

length: 历史 表 中 的 项 数 。 


DODOO DO 
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2. history 对 象 的 方法 

口 back0: 装载 历史 表 中 的 前 一 个 URL。 

口 forward0: 装载 历史 表 中 的 后 一 个 URL。 

口 goG): 当 i 为 数值 时 , 表示 装载 历史 表 中 与 当前 项 相距 i 的 URL; 当 i 为 字符 串 时 ， 
表示 装载 历史 表 中 含 字符 串 的 URL。 

【实用 举例 】 在 文章 阅读 页 面 设计 中 ， 首 先是 在 一 个 页 面 中 显示 文章 列表 ， 单 击 某 文 

章 标题 则 可 以 通过 超 链接 显示 文章 的 具体 内 容 。 要 从 显示 文章 内 容 页 面 返回 到 前 一 个 页 面 ， 

可 通过 设 定 如 下 标记 实现 ， 这 是 利用 浏览 器 的 回 退 功能 来 实现 快速 返回 到 先前 的 页 面 。 
<span onclick="history.back( )"> 返 回 </span> 
为 了 美化 界面 设计 ， 文 字 “ 返 回 ” 的 位 置 也 可 以 用 图 片 代替 。 

【 例 8-9】 在 网 上 讨论 区 更 改 用 户 昵称 


和 一-eX8-9.asp- 一 -一 
<% 

file = "data.mdb" 

strpath="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 

set conn = server.createobject("adodb.connection") 


conn.open strpath "连接 数据 库 
User= request.cookies("username") ' 取 得 用 户 身 份 
sql="select usercall from user_call where userid="&user&"™ 
查询 用 户 昵称 表 


set rs= conn.execute(sql) 
if request.form("nicheng")<>"" then 判断 是 否 属于 表单 提交 处 理 


if rs.eof then ' 检 查 用 户 是 否 有 昵称 
sql="insert into user_call values(”&user&","&request("nicheng")&")” ' 添 加 用 户 昵称 
else 


sql="update user_call set usercall="&request.form("nicheng")&"" where userid=" &user&"™" 
更 改 用 户 昵称 
end if 
conn.execute(sql) 
response.write "<script>alert(' 昵称 更 改 成 功 ! );history.go(-2);</script>" ' 回 退 到 讨论 页 面 
response.end 
else ' 非 表单 提交 ， 读 取 用 户 原 有 昵称 以 便 进 行 显示 
if not rs.eof then 
nicheng=rs("usercall") "' 读 取 原 来 的 用 户 昵称 
else 
nicheng=user "以 前 无 昵称 ， 则 默认 昵称 为 用 户 标识 名 
end if 
%> 
<HTML> 
<head> 
<STYLE type=text/css> 
body{ 
COLOR:blue; FONT-FAMILY: "宋体 "; FONT-SIZE: 12pt 
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} 

</STYLE> 

</head> 

<BODY ><CENTER><br><br> 

<form action="change_call.asp" method="post" > 

<fieldset style="width: 80%; height: 204; border: 1px solid #9FB7F4"> 

<legend> 更 改 用 户 昵称 </legend><br><br> 

<TABLE width="80%" border="0" ><tr> 

<TD align=right width="53%”><font color="#006666"> 新 昵称 (</font><font color="#FF0000"> 
*</font><font color="#006666">)</font>&nbsp;</TD> 

<TD align=left width="50%"> 

<INPUT type="text" size="12" name="nicheng" value='<%=nicheng%>'> 

</TD> </TR> 

</TABLE> 

<p align="center"> 

<INPUT type="submit" value=" 更 改 "style="width: 100; height: 30; color: #008000; background- 
image: url(images/button_bg5.gif)" ></p> </fieldset> 


</form> 

</BODY> 

</HTML> 

<%end if%> 

【使 用 示例 】 网 络 教 学 系统 讨论 区 用 户 昵称 更 改 界面 如 图 8-7 所 示 。 

= 上 jx 
| 文件 中 炉 辑 查看 WW) 收 节 上) 工具 0D) 得 助 0 | 导 
j 地 | 乱 ] http://1ocalhost/student_do. asp 司 回 天 


更 改 用 户 昵称 


新 昵称 (*) 耳 客 


【3 
图 8-7 网络 教学 系统 讨论 区 用 户 昵称 更 改 界面 
【说 明 】 本 例 是 网 络 教 学 系统 中 更 改 用 户 昵 称 页 面 的 完整 程序 。 在 讨论 区 页 面 提供 了 
一 个 超 链接 进入 此 程序 页 面 ， 这 是 一 个 自 提交 的 ASP 程序 。 更 改 昵 称 写 入 数据 库 后 通过 如 
下 输出 在 页 面 上 显示 一 个 对 话 框 ， 用 户 单 击 对 话 框 后 ， 将 执行 后 面 的 history.go(-2) 方 法 回 
退 到 讨论 页 面 。 
response.write "<script>alert(" 昵称 更 改 成 功 ! );history.go(-2);</script>" 


【注意 】 本 例 中 “表单 控件 分 组 ”和 “更 改 ” 按 钮 应 用 了 内 联 样式 。 
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8.1.5 ”external 对 象 


该 对 象 有 一 个 常用 的 addFavorite 方法 ， 利 用 该 方法 可 实现 将 指定 的 网 页 添加 到 收藏 夹 
中 。 例 如 ， 在 页 面 中 设置 以 下 超 链接 ， 单 击 超 链接 可 将 网 页 收藏 。 


<a href=# onClick="Javascript: 
window.external.addFavorite('http://cai.ecjtu.jx.cn/",' 华 东 交 通 大 学 网 络 教学 平台 ')"> 点 击 珍藏 </a> 


8.1.6 ”navigator 对 象 


该 对 象 用 于 确定 用 户 访问 时 使 用 的 navigator 版 本 ， 主 要 有 以 下 属性 。 
(1) appCodeName: 返回 用 户 浏览 器 的 代码 名 。 
(2) appName: 返回 用 户 浏览 器 的 实际 名 字 。 
(3) appVersion: 返回 用 户 浏览 器 的 版 本 号 。 
(4) userAgent: 该 属性 反映 用 户 浏览 器 的 全 部 信息 。 


8.1.7 ”screen 对 象 


screen 对 象 包含 客户 端 显示 屏 的 有 关 信息 ， 主 要 有 以 下 属性 。 

(1) availHeight: 返回 不 含 任务 栏 的 显示 屏 高 度 。 

(2) availWidth: 返回 不 含 任务 栏 的 显示 屏 宽度 。 

(3) height: 返回 显示 屏 高 度 。 

(4) width: 返回 显示 屏 宽度 。 

(5) pixelDepth: 返回 显示 屏 的 彩色 分 辩 率 〈 每 像素 的 位 数 ) 。 该 属性 正 不 支持 。 

例如 ， 某 个 应 用 中 拟 设置 两 种 显示 风格 ， 一 种 是 低 分 辨 率 (显示 宽度 小 于 1024) 的 ， 
另 一 种 是 高 分 辨 率 的 。 可 用 如 下 代码 进行 检测 ， 并 将 结果 记录 到 表单 的 一 个 隐 含 域 中 ， 以 
便 在 后 续 ASP 页 面 中 能 根据 表单 提交 的 值 选择 页 面 显示 风格 。 

<SCRIPT LANGUAGE="JavaScript"> 


if (screen.width <1024){ 
mymode.value="2" /Imymode 为 隐 含 域 ，1 为 高 分 辩 率 ，2 为 低 分 辩 率 


» 
</script> 


8.2 ” JavaScript 的 事件 处 理 


JavaScript 采用 了 事件 驱动 的 响应 机 制 ， 用 户 在 网 页 中 的 交互 操作 会 触发 相应 的 事件 ， 
当 事 件 发 生 时 ， 系 统 将 自动 执行 对 应 的 事件 处 理 函数 。 
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8:2:1 


在 
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JavaScript 事件 处 理 方法 
JavaScript 中 使 用 事件 的 第 一 步 是 注册 事件 处 理 程 序 ， 以 便 浏览 器 在 触发 事件 时 能 


够 运行 相应 的 脚本 程序 。 具 体 注 册 方 法 有 多 种 ， 其 中 ， 内 联 事件 是 最 常用 的 方法 ， 直 接 事 件 


注册 也 


用 得 比较 多 ， 本 书 的 程序 实例 中 主要 使 用 这 两 种 方法 ， 它 们 可 适用 于 各 类 浏览 器 。 


在 页 面 上 进行 某 个 操作 可 能 导致 多 个 事件 发 生 ， 处 理事 件 流 的 技术 主要 有 两 种 模型 : 


一 种 是 事件 冒 泡 技术 ， 事 件 从 内 层 元 素 向 外 层 元 素 依次 触发 ， 另 一 种 是 事件 捕获 技术 ， 事 


件 从 多 


在 


层 元 素 向 内 层 元 素 依次 触发 。 
以 下 HTML 代码 中 ，p 元 素 嵌 套 在 div 元 素 中 。 


<div> <p> Event order </p> </div> 
假设 这 两 个 元 素 都 有 onmouseover 的 事件 处 理 程序 ， 如 果 用 户 鼠 标 指针 划 过 该 元 素 ， 
则 在 事件 捕获 技术 中 先 触发 外 层 元 素 div 的 mouseover; 而 在 事件 冒 泡 技术 中 ,， 先 触发 内 层 


元 素 p 


的 mouseover。IE 支持 事件 冒 泡 技术 ; W3C DOM 既 支 持 事 件 捕获 技术 ， 又 支持 事 


件 冒 泡 技术 。 


1. 


内 联 事件 注册 


通过 HTML 标记 的 相应 属性 进行 内 联 事件 注册 。 例 如 ， 以 下 代码 通过 按钮 的 onclick 
属性 注册 单 击 按钮 时 执行 startNow0 函 数 。 


<input id="myid” type="button" onclick="startNow()"> 


2. 


直接 事件 注册 


在 脚本 代码 中 ， 使 用 HTML 元 素 的 事件 属性 的 定义 注册 要 执行 的 函数 。 例 如 : 


var myElement = document.getElementByld("myid"); 
myElement.onclick = startNow; // 注 意 ， 这 里 的 函数 startNow 不 能 加 括号 


在 脚本 代码 中 ， 事 件 注销 用 如 下 方法 : 


myElement.onclick = null; 


3 


为 同一 事件 注册 多 个 处 理 程序 


如 果 要 为 元 素 的 一 个 事件 注册 多 个 处 理 程序 ， 则 正 和 W3C 的 方法 各 不 相同 。 


( 
口 


1) 正 事件 注册 模型 的 方法 
注册 事件 处 理 程序 


ImyElementattachEvent("onclick" ,funl): 
myElement.attachEvent("onclick",fun2); 


其 


口 


中 ，funl1、fun2 均 为 事件 处 理 要 调用 的 函数 。 
注销 事件 处 理 程 序 


myElement.detachEvent("onclick",fun]): 
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myElement.detachEvent("onclick",fun2); 
(2) W3C DOM 事件 注册 模型 的 方法 

用 addEventListener 方法 进行 事件 注册 ， 该 方法 使 用 3 个 参数 ， 即 事件 名 称 、 函 数 名 称 
和 一 个 布尔 值 。 布 尔 值 的 设 定 取决 于 浏览 器 的 事件 处 理 机 制 。 

口 ”注册 事件 处 理 程序 

myElement.addEventListener("click",funl ,false) 

myElement.addEventListener("click",fun2,false); 

其 中 ， 如 果 addEventListener 的 第 3 个 参数 置 为 True， 则 表示 使 用 事件 捕获 ， 如 果 置 
为 False， 则 表示 使 用 事件 冒 泡 。 

口 ”注销 事件 程序 

myElement.removeEventListener("click", fun1 ,false); 


若 考 虑 两 者 的 兼容 使 用 ， 则 事件 注册 的 处 理 方法 可 进行 如 下 编写 : 


var addH = document.getElementByld("myid"); 

if (addH.addEventListener) { 
addH.addEventListener("click", fun1, false); 

} WW3C DOM 注册 事件 处 理 程序 

else if (addH.attachEvent) { 
addH.attachEvent("onclick", fun1); 

} UIE 注册 事件 处 理 程序 


8.2.2 ”常见 事件 一 览 


网 页 中 各 类 对 象 的 常用 事件 如 表 8-1 所 示 。 
表 8-1 网 页 中 各 类 对 象 的 常用 事件 


对 象 类 别 事件 处 理 函 数 定义 位 置 事件 触发 条 件 

Load 载 入 当前 网 页 时 触发 

Unload 试图 载 入 一 个 新 的 网 页 时 触发 

ContextMenu ”| 单 击 鼠 标 右键 ， 弹 出 快捷 菜单 时 触发 
网 页 对 象 <body> 或 Keydown 按 下 键盘 上 的 某 个 键 时 触发 
document document.body Keypress 当 用 户 按 下 字面 按键 时 触发 

keyup 当 用 户 释放 键盘 按键 时 触发 


mousedown 用 任何 鼠标 键 单 击 对 象 时 触发 


Submit 用 户 提交 表单 时 触发 


区 So Reset 用 户 复位 表单 时 触发 

文本 框 <input type="text"> Focus 文本 框 得 到 焦点 时 触发 

口令 输入 框 <input type="password"> | Change 文本 框 、 下 拉 列 表 框 内 容 发 生变 化 时 触发 
多 行文 本 域 <textarea> Select 选 定 文本 框 中 的 文本 时 触发 


下 拉 列 表 框 <select> blur 当 控 件 对 象 失去 焦点 时 触发 
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续 表 


对 象 类 别 事件 处 理 函 数 定义 位 置 事件 触发 条 件 


普通 按钮 <input type="button"> 

提交 按钮 <input type="submit"> 

复位 按钮 <input type="reset"> 单 击 按钮 时 触发 
单 选 按钮 <input type="radio"> 

复 选 框 <input type="checkbox"> 


超 链接 单 击 超 链接 时 触发 


<a> 
不 同类 型 的 浏览 器 在 事件 处 理 上 存在 差异 , 正 浏览 器 中 以 window.event 对 象 描 述 事件 。 
该 对 象 中 含有 一 系列 属性 , 通过 访问 这 些 属 性 , 可 得 到 事件 相关 信息 。 表 8-2 列 出 了 window. 
event 对 象 的 常用 属性 。 
表 8-2 window.event 对 象 的 常用 属性 
属 性 含义 


keyCode 此 属性 存储 击 键 的 代码 
4 此 属性 存储 事件 相关 的 x 坐标 
此 属性 存储 事件 相关 的 y 坐标 
altKe 此 属性 当 Alt 键 被 按 下 时 为 真 
ctrlIKe 此 属性 当 Ctrl 键 被 按 下 时 为 真 
shiftKe 此 属性 当 Shift 键 被 按 下 时 为 真 
button 此 属性 获取 鼠标 按键 值 ， 左 键 为 1， 右键 为 2 或 3， 中 间 键 为 4 
srcElement 此 属性 存储 产生 事件 的 元 素 
screenX 此 属性 存储 相对 于 屏幕 实际 尺寸 的 x 坐标 
ScreenY 此 属性 存储 相对 于 屏幕 实际 尺寸 的 y 坐标 
vpe 此 属性 为 事件 类 型 的 字符 串 表 示 


8.2.3 document 的 常用 事件 


1. Load、Unload 事件 
Load 事件 在 网 页 加 载 时 发 生 , 而 Unload 事件 在 离开 网 页 时 发 生 。 例 如 ,<body OnUnLoad= 
"alert( 谢 谢 光 临 本 站 ">。 
在 实际 应 用 中 经 常 使 用 网 页 装载 时 执行 某 个 方法 来 实现 网 页 加 载 时 页 面 内 容 的 动态 显 
示 处 理 。 
【 例 8-10】 按 比 例 显示 条 形 图 


一 Sr DN 


<script language="javascript"> 
function calculate() { 
rate=Math.round(Math.random()*100);”// 随 机 产生 第 一 项 的 显示 比例 


第 8 章 DHTML 编程 “175 


aimg.height = 3*rate; /控制 图 片 高 度 
pl.innerHTML=rate+"%"; /显示 百分率 


rate=Math.round(Math.random()*100); // 随 机 产生 第 二 项 的 显示 比例 
bimg.height = 3*rate; 
p2.innerText=rate+"%"; 
} 
</script> 
</head> 
<body onload="calculate()"> 
<table> 
<td width=50 valign="bottom"> 
<span id="p1"></span><br> 
<img border="0" id="aimg" src="images/bara.gif’ width="20"> 
</td> 
<td width=50 valign="bottom"> 
<span id="p2"></span><br> 
<img border="0" id="bimg" src="images/barb.gif’ width="20"> 
</td> 
</table> 
</body> 
</html> 


运行 结果 如 图 8-8 所 示 。 
可 


| 文件 四 轴 枉 G) 查看 ” 的 


刚 征 面 [四 b veeio ea 加 


图 8-8 ”显示 条 形 图 

【说 明 】 本 例 演 示 了 如 何 利用 图 片 显示 高 度 的 调整 控制 条 形 图 的 显示 比例 ， 可 用 于 数 
据 分 析 显示 处 理 。 这 里 利用 随机 函数 产生 模拟 数据 ， 实 际 应 用 中 通常 需要 访问 数据 库 获 取 
分 析 数 据 。 在 程序 中 直接 通过 元 素 标识 访问 页 面 对 象 。 

2. ContextMenu 事件 

在 弹出 菜单 之 前 发 生 该 事件 , 可 定义 事件 过 程 函 数 , 如 果 函 数 返 回 结果 为 True 则 弹出 ， 
否则 不 弹出 。 例 如 ， 以 下 代码 直接 返回 False， 实 际 上 就 是 禁用 了 弹出 菜单 。 


<body OnContextMenu="return false"> 


3. SelectStart 和 DragStart 事件 
通过 鼠标 拖 动 来 选取 网 页 内 容 之 前 发 生 SelectStart 事件 ， 可 定义 事件 过 程 函数 ， 如 果 
函数 返回 结果 为 True 则 表示 允许 选择 ,否则 不 能 选中 。 例如 , 以 下 是 禁止 在 页 面 选择 内 容 : 
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<body OnSelectStart="return false"> 
以 鼠标 拖 电 的 方式 开始 选取 内 容 时 发 生 DragStart 事件 。 
4. Document 对 象 的 鼠标 事件 
Document 的 鼠标 事件 有 很 多 ， 前 面 两 个 事件 实际 也 与 鼠标 有 关 。 以 下 列 出 的 事件 主要 
是 针对 鼠标 的 单 击 与 移动 。 
(1) Click 事件 : 单 击 鼠标 时 发 生 。 
(2) dbClick 事件 ， 双击 鼠标 时 发 生 。 
(3) MouseDown 事件 : 按 下 鼠标 左 键 时 发 生 。 
(4) MouseOver 事件 ， 鼠标 移 到 对 象 上 时 发 生 。 
(5) MouseOut 事件 :鼠标 离开 对 象 时 发 生 。 
(6) MouseUp 事件 : 放 开 鼠 标 左 键 时 发 生 。 
(7) MouseMove 事件 :鼠标 移动 时 发 生 。 
【 例 8-11】 借助 mousedown 事件 处 理 禁止 用 户 通过 鼠标 右键 弹出 快捷 菜单 
本 例 中 给 出 了 document 对 象 的 mousedown 事件 的 两 种 定义 办 法 ， 处 理事 件 时 可 以 判 
断 按 了 哪个 鼠标 键 ， 根 据 需要 进行 不 同 的 处 理 。 


<script language="javascript"> 
function nomenu( ){ 
if(event.button==2||event.button==3) { 
alert(" 禁 止 鼠 标 右键 弹出 快捷 菜单 ); 
} 
ee /定义 文档 的 mousedown 事件 的 处 理 函 数 
</script> 


【应 用 思考 】 在 网 页 中 加 入 该 代码 段 可 禁止 用 户 通 过 快捷 菜单 查看 源 代码 ， 再 加 上 
OnSelectStart 事件 可 以 禁止 用 户 选择 文本 ， 在 一 定 程度 上 实现 了 网 页 的 防 复制 。 合 在 一 起 
可 写 为 如 下 形式 : 

<BODY onSelectStart="return false;" onMouseDown="nomenu( )"> 


5. Document 对 象 的 键盘 事件 


Document 对 象 的 键盘 事件 包括 KeyDown 和 KeyPress 事件 ， 当 用 户 按 下 任意 键 时 首先 
产生 KeyDown 事件 ， 接 着 产生 KeyPress 事件 ， 若 用 户 一 直 按 住 该 键 ， 则 会 产生 连续 的 
KeyPress 事件 。 此 时 若 释 放 按键 则 产生 Onkeyup 事件 。 

【 例 8-12】 有 趣 的 猜 字符 练习 程序 


- -ex8-12.htm 
<html> 

<head> 

<script language="javascript" > 
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var pos=0; // 当 前 输入 位 置 

var content="hello..."; // 被 猜 的 内 容 ， 实 际 上 可 由 服务 器 数据 库 获 取 
/拼接 显示 结果 的 字符 串 

var right=0; 

var err=0; 

var mylen=content.length; 

function display( )f // 在 标识 为 x 的 层 处 显示 已 比 对 的 检查 结果 


if (pos < mylen) 
x.innerHTML="<pre>"+s+"<font color=#990099> </font></pre>"; 
else 
alert(" 得 分 : "+Math.round(right/(right+err)*100)); 
} 
function mycheck( ){f 
if (pos < mylen){ 
c=content.charAt(pos); 
Pos++， 
me = String.fromCharCode(event.keyCode); // 获 取 用 户 输入 的 字符 
if (me == c){ // 将 用 户 输 入 的 字符 与 答案 中 的 字符 进行 比较 
=S+C; 
right++; 
} 
else{ 
s=s+"<font color=red>"+c+"</font>"; // 输 错 了 ， 用 红色 显示 
err++; 
} 
| 
display( ); // 调 显示 处 理 
} 
</script> 
</head> 
<body onKeyPress="mycheck( )" onload="display( )"> 
<font size=6 color=blue> 
<div id=x style="border:3px dotted #008000; padding:10px; width:98%; height:120px"> 
</div> 


</font> 

</body> 

</html> 

运行 结果 如 图 8-9 所 示 。 
BD: \ez8-12 ht - Wicrosoft Tnteraet L2710E OTe 
| 文件 四 编 如 EE) 查看 W) 收 意 @)， 工具 IJ) 帮助。 | 车 
| 妇 让 加 |e] n: ee-lz hm lS Ee] 


图 8-9 猜 字符 练习 程序 
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【说 明 】 该 程序 通过 将 用 户 从 键盘 输入 的 字符 与 标准 答案 中 的 字符 进行 逐个 比 对 ， 如 
果 输 入 错误 ， 则 用 红色 显示 正确 字符 。 程 序 中 定义 了 两 个 函数 ， 即 displayO 实 现 内 容 的 显 
示 ; mycheckO 实 现 当前 位 置 的 字符 与 键盘 输入 的 比 对 ， 并 统计 对 错 。 

【思考 】 本 例 不 能 处 理 汉 字 ， 因 为 汉字 涉及 编码 判断 。 如 果 练 习 比 对 的 标准 答案 为 教 
师 提 供 的 模板 程序 ， 则 此 程序 改进 后 可 用 于 编程 训练 。 最 好 将 标准 模板 程序 中 的 一 些 内 容 
直接 提示 给 用 户 ， 有 些 让 用 户 填写 ， 此 时 可 通过 引入 一 个 标记 符 来 标识 模板 程序 中 需要 用 
户 填写 的 部 分 。 读 者 可 思考 如 何 改 进 本 例 程序 以 满足 应 用 要 求 。 


8.2.4 表单 处 理 的 常用 事件 


1. Submit 事件 

该 事件 在 表单 提交 时 发 生 ， 事 件 处 理 函数 通常 实现 表单 数据 的 检验 ， 返回 True 则 提交 
数据 ， 否 则 禁止 提交 表单 。 在 以 下 几 种 情况 下 会 发 生 表单 提交 事件 ， 一 是 单 击 了 表单 的 
submit 按钮 ;二 是 在 表单 的 文本 框 中 按 了 回 车 键 ; 三 是 单 击 了 表单 的 图 像 按钮 。 

【 例 8-13】 表单 的 自动 提交 处 理 

本 例 可 将 ASP 的 Server 对 象 提供 的 htmlEncode 方法 转换 后 的 内 容 进行 反 转 换 。 如 果 
数据 库 中 的 数据 在 写 入 时 已 采用 了 Server.htmlEncode 方法 进行 了 变换 处 理 ， 要 恢复 成 原始 
的 数据 可 通过 该 程序 。 仔 细 分 析 该 程序 ， 它 将 转换 的 数据 显示 在 文本 域 中 再 重新 提交 写 入 
数据 库 可 实现 数据 恢复 。 

-PrOCeESS.aSp- 

<% 

x=0+request("n") 'n 为 要 处 理 的 记录 号 ， 初 始 请 求 变量 n 为 空 ， 因 此 x=0 

set conn = server.CreateObject("adodb.connection") 

conn.Open "datasource”" 

strSQL = "select * from mytable" 


set rs=server.CreateObject("adodb.recordset") 
rs.open strsql,conn,1,2 


rs.move x,1 "移动 到 要 处 理 的 记录 处 
if not rs.eof then 
if request("m")<>"" then 
rs("content")=request("m") ' 内 容 存 储 在 content 字段 中 
rs.update 
conn.close 
response.redirect("process.asp?n="&(x+1)) ”“”' 转 向 处 理 下 一 条 记录 
else %> 


<body onload="javascript:my.submit( );"> 
<form name="my" method="post" action="process.asp?n=<%=x%>"> 
<textarea name=m cols=80 rows=10 ><%=rs("content")%></textarea> 
</form> 
<% end if 
conn.close 
end if 
%> 
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【说 明 】 程 序 借助 表单 的 自动 提交 实现 对 所 有 数据 记录 的 处 理 。 通 过 URL 参数 传递 下 
一 个 处 理 的 记录 编号 ， 页 面 装 载 时 通过 onload 事件 的 代码 执行 表单 的 submit() 方 法 让 显示 
处 理 表单 自动 提交 。 

【应 用 思考 】 表 单 的 自动 提交 处 理 在 网 页 编程 中 经 常 遇 到 ， 例 如 ， 考 试 系统 中 的 自动 
交卷 ， 当 考生 时 间 用 完 时 可 通过 脚本 代码 让 解答 表单 自动 提交 。 

; 信 onclick 事件 

鼠标 单 击 各 类 按钮 时 均 发 生 onclick 事件 ，Submit 按钮 的 onclick 事件 优先 于 表单 的 
Submit 事件 进行 处 理 。 也 就 是 说 ， 如 果 同 时 定义 了 两 个 事件 的 处 理 代码 ， 则 先 处 理 onclick 
的 事件 代码 ， 然 后 再 处 理 onSubmit 的 事件 代码 。 

【 例 8-14】 混合 ASP 和 客户 端 脚本 实现 网 上 教学 的 习题 操练 

以 下 程序 从 数据 库 读 取 试题 ,每 屏 显 示 一 道 试题 ,利用 ASP 的 记录 集 翻 页 功能 定位 当 
前 要 显示 的 试题 , 此 时 设 定 页 的 大 小 为 1。 通 过 客户 方 JavaScript 脚本 判断 用 户 解 答 的 对 错 ， 
这 里 编写 了 一 个 函数 check(x,m)， 其 中 ， 参 数 x 为 一 个 控件 ， 传 递 的 实际 参数 是 用 户 选 中 
的 解答 选项 ， 参 数 m 为 试题 的 标准 答案 。5 个 解答 选项 通过 onclick 属性 定义 事件 发 生 时 执 
行 的 check 函数 ， 本 例 为 check 函数 的 参数 x 传递 this 引用 ， 而 参数 m 对 应 的 实 参 从 数据 
库 表 格 代表 试题 答案 的 字段 answer 获得 。 


<SCRIPT LANGUAGE = "JavaScript"> 
function check(x,m) { // 此 函数 检查 解答 的 正确 性 
if (x.value==m) { 
alert(” 对 1"); 


XZztlx.asp 一 -一 一 一- 一- 一- 一- 一 一 一 一 一 -一 -一 一- 一 -一 


else { 
alert(” 错 ""); 

} 
} 
</script> 
<% 
Set Conn=Server.CreateObject("ADODB.connection") 
Conn.Open "connstr" /连接 数据 库 
sql="Select * from jvselect " // 选 取 试 题 


set rs=Server.CreateObject("ADODB.RecordSet") 
rs.open sql,conn,1,1 
"以 下 程序 段 实 现 翻 动 试题 
RS.pagesize=1 每 页 显示 一 道 试题 
ScrollAction = Request("ScrollAction ) 
PageNo=request("page ") 
if ScrollAction <> ”Then 
if ScrollAction = "上 一 题 ” then 
PageNo = PageNo-1 
elseif ScrollAction = "第 一 题 " then 
PageNo =1 
elseif ScrollAction = "下 一 题 " then 


“180 。 Web 编程 实践 教程 


PageNo = PageNo+1 
else 
PageNo=rs.pagecount 
end if 
if PageNo < 1 Then 
PageNo=1 
end if 
else 
PageNo=1 
end if 
RS.AbsolutePage = PageNo 
%> 
<center><font color=blue size=3> 共 有 <font color=red><%=rs.pagecount%></font> 题 ， 此 是 第 
<font color=red><%=PageNo%></font> 题 
<!-- 以 下 显示 来 自 数据 库 表 格 的 试题 内 容 。 --> 
<TABLE> 
<TD> 
<pre><font size=4><b><%= rs("content")%></b></font></pre> 
</TD> 
</TABLE> 
<!-- 以 下 表单 提供 答题 界面 ， 当 用 户 选 中 单 选 按钮 进行 答题 时 将 通过 JavaScript 事件 执行 前 面 定义 
的 JavaScript 函数 进行 对 错 检查 。--> 
<form name="my" method="post"> 
<table width=60%> 
<% i=65 
do while i<=69 %> 
<td align=left> 
<input type="radio" name="ans" value="<%=chr(i)%>" onclick="check(this,'<%=rs("answer") 
%>")"> <%=chr(i)%> 
</td> 
<% i=i+1 
Loop %> 
</table> 
</form> 
<!-- 以 下 表单 实现 试题 翻 页 处 理 --> 
<form METHOD="post" ACTION="xztlx.asp" > 
<input type="hidden" name="page" value="<%=PageNo%>"> 
<% if PageNo > 1 Then %> 
<input TYPE="SUBMIT"” NAME="ScrollAction" VALUE=" 第 一 题 "> 
<input TYPE="SUBMIT" NAME="ScrollAction" VALUE=" 上 一 题 "> 
<% end if %> 
<% if PageNo < rs.pagecount Then %> 
<input TYPE="SUBMIT” NAME="ScrollAction" VALUE=" 下 一 题 "> 
<input TYPE="SUBMIT” NAME="ScrollAction" VALUE=" 最 后 一 题 "> 
<% end if %> 
<% if rs.pagecount=1 Then %> 
<input TYPE="SUBMIT” NAME="ScrollAction" VALUE=" 第 一 题 "> 
<% end if %> 
</form> 
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运行 结果 如 图 8-10 所 示 。 


章节 菜单 导航 学 习 方 式 一 ierosofl TAR _=|DIxl 
上 文件 四 “加 得 四 查看 叫 ” 收 套 他 工具 节 ) 帮助 tn | 


共有 9 题 ， 此 是 第 6 题 


执行 以 下 代码 段 后 ， x，a, 和 b 的 值 为 ? 
1. int x a=6, b=7; 
2. x = att + bt+; 


x= 15, a7, b=8 
x= 15, a6, b=7 
x= 13, a7, b=8 
x= 13, a-6, b=7 


a 


AD BE CC DO EC 
第 - 题 | 上 一 题 | 下 一 题 | 最 后 是 
Ea [LT [网 可 本 W 有 4 
图 8-10 单 选 题 的 交互 做 题 界面 
【思考 】check 函数 的 编写 也 可 以 考虑 改换 形式 ， 如 将 两 个 参数 分 别 定义 为 用 户 解答 的 
值 和 标准 答案 ， 那 么 函数 调用 应 做 相应 修改 。 
由 于 本 例 利 用 翻 页 显示 实现 试题 的 前 后 浏览 ， 且 一 屏 只 显示 一 道 试题 ， 所 以 也 可 以 考 
上 处 直接 跳 转 记录 的 方式 实现 试题 的 翻动 。 读 者 可 尝试 修改 程序 。 


8.2.5 ”表单 中 的 控件 


表单 中 的 各 类 控件 有 很 多 ， 下 面 简要 介绍 几 个 对 象 的 属性 和 方法 。 
1. 下 拉 列 表 框 (select) 对 象 


(1) select 对 象 的 属性 

口 length: select 对 象 中 选项 的 个 数 。 

口 name: select 对 象 的 name 属性 定义 的 名 称 。 

口 selectedIndex: select 对 象 中 当前 被 选中 的 选项 的 下 标 。 

口 ”options: select 对 象 各 选项 的 数组 ， 每 个 选项 有 如 下 属性 。 
急 text: 对 应 标记 显示 的 文本 串 。 
急 value: 表示 value 属性 的 值 。 
争 ”defaultSelected: 反映 该 选项 是 否 为 默认 选中 的 布尔 值 。 
争 selected: 反映 该 选项 当前 选择 状态 的 布尔 值 。 

(2) select 对 象 的 事件 处 理 器 

口 ”onFocus: 定义 当 对 象 获得 焦点 时 执行 的 代码 。 

口 onBlur: 定义 当 对 象 失去 焦点 时 执行 的 代码 。 

口 onChange: 定义 当 对 象 的 值 有 所 改变 时 执行 的 代码 。 
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2. 复 选 框 (checkbox) 对 象 


(1) 属性 

口 name: 复 选 框 的 name 属性 的 字符 串 值 。 

口 value: 复 选 框 的 value 属性 的 字符 串 值 。 

口 “checked: 复 选 框 是 否 选中 的 布尔 值 ， 如 果 选 中 ， 则 为 Tme， 否 则 为 False。 

口 ”defaultChecked: 反映 该 选项 是 否 为 默认 选中 的 布尔 值 。 

【应 用 提示 】 在 JavaScript 脚本 代码 中 ， 要 获取 一 组 复 选 框 的 选择 值 ， 需 要 先 用 checked 
属性 检查 该 复 选 框 是 否 选 中 ， 再 通过 value 属性 得 到 相应 值 。 

(2) 方法 

click0: 选中 复 选 框 。 

(3) 事件 处 理 器 

onclick: 定义 用 户 单 击 Checkbox 时 执行 的 事件 代码 。 

3. 单 选 按钮 radio) 对 象 

(1) 属性 
name: 单 选 按钮 的 name 属性 的 字符 串 值 。 
length: radio 对 象 中 单 选 按 钮 的 个 数 。 
value: 选中 的 单 选 按钮 的 value 属性 的 字符 串 值 。 
checked: 布尔 值 ， 按 钮 被 按 下 时 为 True， 否 则 为 False。 
defaultChecked: 按钮 的 checked 属性 的 初 值 ， 是 反映 按钮 是 否 为 默认 选中 的 布尔 值 。 

(2) 方法 

click0: 选中 单 选 按钮 。 

(3) 事件 处 理 器 

onclick: 定义 当 单 选 按钮 被 选中 时 执行 的 事件 代码 。 

最 后 要 注意 的 是 ， 页 面 上 的 所 有 元 素 均 可 看 作为 对 象 ， 表 格 中 的 单元 格 也 可 以 定义 
onclick 属性 进行 代码 编程 处 理 。 图 片上 的 鼠标 事件 在 编程 处 理 中 应 用 也 很 广泛 。 例 如 ， 以 
下 是 网 络 教学 系统 中 功能 导航 区 域 的 一 个 图 片 的 鼠标 事件 处 理 ， 在 图 片 的 onmouseover 事 
件 中 定义 了 要 执行 的 3 个 函数 。 关 于 具体 代码 ， 读 者 可 到 该 页 面 查看 。 

<img border="0" src="'images/funch6-6.gf” name=Image3 onmouseover="MM_swaplmgRestore(); 

MM_swaplmage('Image3',",images/funch6-m.gif ,1);changemenu(4)" > 


DOOOO 


本 章 小 结 


本 章 介 绍 了 DHTML 技术 中 的 浏览 器 对 象 模型 以 及 JavaScript 的 事件 处 理 。 这 些 内 容 
和 技术 处 理 是 客户 端 编程 的 重要 组 成 部 分 。 文 档 对 象 模 型 (DOM) 将 页 面 上 的 所 有 元 素 均 
看 作为 对 象 ， 通 过 DOM 结合 脚本 编程 可 动态 改变 页 面 的 内 容 和 显示 风格 。 本 章 的 重点 是 
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掌握 window、document、form 等 对 象 的 属性 和 方法 ， 熟 悉 典型 事件 处 理 。 利 用 本 章 介绍 的 
内 容 可 以 让 浏览 器 页 面 实现 很 好 的 交互 性 。 


习题 

1. 选择 题 

(1) 在 DHTML 中 把 整个 文档 的 各 个 元 素 作为 对 象 处 理 的 技术 是 Rs 
A. HIML B. CSS C. DOM D. JavaScript 


(2) 关于 正 的 window 对 象 ， 下 列表 述 中 正确 的 是 Fa 
A. window.opener 属性 本 身 就 是 指向 window 对 象 的 
B. window.reload0) 方 法 可 以 用 来 刷新 当前 页 面 
C. window.location="a.html" 和 window-.location hre 人 "ahtml" 的 作用 都 是 把 当前 页 
面 替 换 成 ahtml 页 面 
D. 定义 了 全 局 变量 g， 可 以 用 window.g 的 方式 来 存 取 该 变量 
(3) 关于 JavaScript 事件 ， 下 列 说 法 正确 的 是 〈 bP 
A. 事件 是 用 户 对 浏览 器 所 做 的 特定 的 动作 操作， ， 是 实现 交互 操作 的 一 种 机 制 
B. 对 象 发 生 改变 时 调用 的 事件 是 onChange 
C.， 当 一 个 表单 中 的 对 象 被 单 击 时 ， 执 行 的 JavaScript 事件 是 onclick 
D. 当 浏 览 器 加 载 完成 一 个 窗口 或 加 载 完成 框架 集合 中 的 所 有 框架 时 ， 执 行 的 
JavaScript 事件 是 onLoad 
(4) JavaScript 的 onSubmit 事件 的 作用 是 〈 入 
A. 当 一 个 表单 中 的 对 象 被 单 击 时 ， 执 行 的 是 JavaScript 事件 
B， 当 用 户 提 交 一 个 表单 时 ， 需 要 执行 的 是 JavaScript 事件 
C. 当 鼠 标 移出 对 象 时 发 生 的 事件 
D. 对 象 发 生 改变 时 调用 的 事件 
(5) 有 关 window 对 象 ， 下 列 说 法 正确 的 是 Y's 
A. 代表 一 个 浏览 器 的 窗口 或 框架 
B. 是 一 个 文档 、 链 接 或 历史 对 象 组 的 顶层 对 象 
C. 窗口 对 象 不 能 设置 状态 栏 默 认 信息 
D. 判断 窗口 是 否 关 闭 ， 可 以 使 用 窗口 对 象 的 closed 属性 
(6) 有 关 窗 口 对 象 的 属性 ， 下 列 说 法 正确 的 是 〈 站 
A. 设置 状态 栏 的 临时 信息 是 用 status 属性 
B. 查看 该 窗口 最 近 查 阅 过 的 网 页 用 history 属性 
C. 对 当前 窗口 进行 操作 是 用 self 属性 
D. 对 最 上 方 的 窗口 进行 操作 是 用 top 属性 
E. 要 设置 浏览 器 滚动 条 ， 可 以 使 用 窗口 对 象 的 scrollbars 属性 
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(7) 有 关 open 方法 的 窗口 规格 参数 ， 下 列 说 法 正确 的 是 (  ) 。 


A. 是 否 
. 是 否 显示 菜单 工具 栏 ， 用 menubar 
ee 用 scrollbars 


也， 


显示 网 址 工具 栏 ， 用 location 


显示 状态 栏 ， 用 status 
ee 的 大 小 ， 用 resize 


(8) 关于 表单 对 象 的 方法 ， 下 列 说 法 正确 的 是 〈 闫 各 


A. 
.reset() 可 以 重 置 表单 元 素 

.submit() 可 以 提交 表单 

.表单 对 象 的 方法 是 表单 对 象 为 完成 需求 而 调用 的 方法 


书 癌 口上 台 


《9 


sr 


(10) 要 获取 一 个 ID 为 username 的 表单 元 素 的 值 ， 不 正确 的 代码 是 (  €)。 
A. 
B. 
G: 
D. 


handleEvent( 事 件 ) 可 以 使 事件 处 理 程序 生效 


. 表单 对 象 的 方法 是 表单 对 象 通过 事件 而 调用 的 方法 


选择 对 象 的 属性 主要 有 (  )。 
A. 


form 表示 该 对 象 所 在 的 表单 


B. name 表示 该 对 象 的 name 属性 

C. length 表示 该 对 象 的 选项 的 数目 
5 
E. 


options 表示 该 对 象 的 <option> 标 记 
selectedIndex 表示 该 对 象 的 所 选项 目的 索引 值 


document.username.value 
document.all.usermmame.value 
document.getElementById("username").value 


如 果 表 单元 素 外 层 无 表单 ， 则 可 以 直接 使 用 usemame.value 


(11) 如 果 想 控制 一 个 名 为 menuBar 的 层 左 移 20 个 像素 显示 ,下 列 能 实现 的 是 ( 


A. 
B. 
CC 
DBD. 


document.menuBar.display += 20 
document.all.menuBar.pixelLeft += 20 
document.all.menuBatr.left += 20 
document.all.menuBar.style.pixelLeft += 20 


2. 设计 题 


(1) 利用 脚本 代码 将 网 页 的 状态 栏 设 置 为 “你 的 班级 + 姓名 的 网 页 ! 欢迎 你 ! ”。 
(2) 关闭 网 页 时 ， 为 访问 者 弹出 在 该 网 页 停留 的 时 间 ， 显 示 格 式 为 “** 分 ** 秒 ”。 


意 ; 不 能 只 显示 为 几 秒 ， 若 超过 60 秒 则 要 换 成 分 钟 进行 显示 。 
(3) 编写 个 人 信息 注册 表单 ， 利 用 JavaScript 代码 检查 表单 输入 。 若 满足 如 下 条 件 则 
提交 表单 ， 否 则 不 提交 。 


口 “用户 名 不 能 为 空 ， 也 不 能 含有 英文 单 引号 字符 。 
口 ”密码 至 少 要 6 位 且 两 个 密码 必须 相同 。 
口 ”电子 邮件 地 址 中 必须 包含 @ 符 号 


5 


注 
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运用 以 下 两 种 方式 编程 实现 表单 提交 : 

Q@ 利用 表单 自身 的 提交 功能 ， 在 表单 提交 事件 处 理 代码 返回 True 时 才 正 式 提交 。 
@ 在 按钮 单 击 事件 处 理 代码 中 调用 表单 对 象 的 submit0 方 法 实现 表单 提交 。 

(4) 参照 书 中 单 选 题 练习 的 样 例 实现 多 选 题 的 交互 做 题 。 试 题 及 标准 答案 存储 在 数据 


库 表 格 中 。 由 于 每 道 题 的 选择 可 以 多 个 , 所 以 不 能 依靠 选项 上 发 生 的 事件 来 判别 解答 对 错 ， 
这 时 可 以 借助 表单 提交 事件 ， 利 用 翻动 试题 按钮 触发 表单 提交 。 


【提示 】 利 用 选项 的 checked 属性 可 检查 选项 是 否 选中 ， 然 后 将 各 选项 的 值 拼接 在 一 


起 即 为 用 户 解 答 。 


果 ， 


(5) 编程 实现 在 网 页 中 轮流 显示 不 同 图 片 的 动画 效果 ,安排 几 个 按钮 控制 该 动画 的 效 
分 别 为 放大 、 缩 小 、 人 停止、 启动。 以 下 为 实现 图 片 更 替 显 示 的 参考 代码: 


<head> 
<Script Language="JavaScript"> 
var i=1 
function image_change( ) { 
if(i==5) {i=1;} 
my_image.src="Image"+i+".jpg"; 
i=i+1; 
setTimeout(image_change( ) ,1000); 
} 
</Script> 
</head> 
<body onload="image_change( )" > 
<img src="" name="my_image" width="32" height="32" id="my_image" /> 
</body> 


【提示 】 放 大 、 缩 小 通过 改变 图 片 的 高 度 和 宽度 实现 。 
(6) 利用 JavaScript 实现 一 个 简单 计算 器 。 使 用 表格 安排 计算 器 上 的 按钮 ， 包 括 数字 


按钮 、 基 本 算术 运算 符 、 等 号 及 清除 按钮 。 


(7) 利用 DHTML 技术 实现 一 个 三 子 棋 连 线 的 游戏 程序 。 只 要 横 、 竖 、 对 角 线 出 现 同 


一 方 的 棋子 就 算 胜 。 可 考虑 用 表格 进行 布局 ， 在 单元 格 内 单 击 事件 触发 下 棋 。 棋 子 用 图 片 
表示 ， 每 个 单元 格 要 进行 标识 ， 已 下 棋 单元 格 的 棋子 的 颜色 用 一 个 数值 代表 并 记录 在 数组 


中 。 


每 下 一 步 棋 进行 一 次 胜 负 检查 。 


第 9 章 XML 技术 与 应 用 


XML 为 扩展 标记 语言 (eXtensible Markup Language) ， 是 由 W3C 定义 的 一 种 新 的 
Internet 数据 描述 和 交换 标准 。XML 在 描述 数据 内 容 的 同时 能 突出 对 结构 的 描述 ， 从 而 体 
现 出 数据 之 间 的 关系 。 在 XML 中 用 户 可 以 自由 地 定义 标记 名 以 及 与 标记 相关 的 元 素 及 元 
素 层 次 。 可 以 说 , XML 的 出 现 给 数据 交换 带 来 了 一 场 革命 。 本 章 主 要 介绍 XML 的 典型 应 用 。 


9.1 XML 文档 格式 


XML 文档 的 基本 结构 由 序言 部 分 和 一 个 根 元 素 组 成 。 序 言 包括 XML 声明 和 DTD 
(Document Type Define， 文 档 定义 类 型 ) 或 XML Schema， 两 者 是 用 来 描述 XML 文档 结 


构 的 ， 也 就 是 描述 元 素 和 属性 应 遵守 的 类 型 约束 。 
1. 元 素 


元 素 是 XML 文档 内 容 的 基本 单元 ， 是 由 起 始 标签 、 元 素 内 容 和 结束 标签 组 成 的 。 其 
语法 格式 如 下 : 
< 标签 > 文本 内 容 </ 标 签 > 
在 XML 中 没有 任何 保留 字 ， 除 了 必须 遵守 下 列 规范 外 ， 可 以 用 任何 词语 来 作为 元 素 
名 称 。 
(1) 名 称 中 可 以 包含 字母 、 数 字 及 其 他 字母 。 
(2) 名 称 不 能 以 数字 或 ″”” 下划线 ) 开头 。 
(3) 名 称 不 能 以 字母 xml (或 XML 或 Xml .) 开头 。 
(4) 名 称 中 不 能 包含 空格 或 “:” (冒号 ) 。 
无 论文 本 内 容 有 多 长 或 多 么 复杂 ,XML 元 素 中 仍 可 以 再 嵌 套 其 他 元 素 ， 这 样 就 可 以 使 
相关 信息 按 一 定 层次 结构 进行 组 织 。 
【 例 9-1】 描述 职员 信息 的 XML 文档 
<employees> 
<employee> 
<name>Lars Peterson</name> 
<salary>25000</salary> 
</employee> 
<employee> 
<name>Charlotte M. Cooper</name> 
<salary>34500</salary> 
</employee> 
</employees> 
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【说 明 】 在 <employees> 的 元 素 中 包括 了 所 有 职员 的 信息 ， 每 位 职员 都 由 <employee> 元 

素来 描述 ， 而 <employee> 元 素 中 又 嵌 套 了 <name> 和 <salary> 元 素 。 

如 果 一 个 元 素 从 文件 头 的 序言 部 分 之 后 开始 一 直到 文件 尾 ， 包 含 了 文件 中 所 有 的 数据 
信息 ， 那 么 该 元 素 称 之 为 根 元 素 。 

从 本 例 中 可 看 出 ，XML 元 素 是 可 以 赃 套 的 ， 被 嵌 套 在 内 的 元 素 称 为 子 元 素 。 本 例 中 ， 
<employee> 就 是 <employees> 的 子 元 素 。 

除了 元 素 ，XML 文档 中 能 出 现 的 有 效 对 象 还 包括 处 理 指 令 、 注 释 和 属性 。 

2. 处 理 指令 

处 理 指令 为 XML 解析 器 提供 信息 ,使 其 能 够 正确 解释 文档 内 容 , 它 的 起 始 标识 是 “<?”， 
结束 标识 是 “?>”。 常 见 的 XML 声明 就 是 一 个 处 理 指 令 : 

<?xml version="1.0" standalone="yes/no" encoding="UTF-8"?> 

声明 的 作用 是 告诉 浏览 器 或 其 他 处 理 程序 ， 这 个 文档 是 XML 文档 。 声 明 语句 中 的 
version 表示 文档 遵守 的 XML 规范 的 版 本 ; standalone 表示 文档 是 否 附带 DTD 文件 ， 如 果 
有 ， 则 参数 为 yes; encoding 表示 文档 所 用 的 语言 编码 ， 默 认 是 UTF-8。 为 支持 中 文 显示 ， 
可 在 XML 文档 开头 加 入 如 下 处 理 指令 : 


<?xml version="1.0" encoding="gb2312"?> 


处 理 指令 还 有 其 他 用 途 ， 如 定义 文档 的 编码 方式 是 GB 码 还 是 Unicode 码 ， 或 是 把 一 
个 样式 单 文件 应 用 到 XML 文档 上 用 以 显示 。 
3. 注释 
注释 可 出 现在 XML 元 素 间 的 任何 位 置 ， 但 是 不 可 以 嵌 套 ， 它 与 HTML 中 的 定义 形式 
- 样 。 其 语法 格式 如 下 : 
<!-- 注 释 --> 
4. 属性 


属性 为 元 素 提供 了 进一步 的 说 明 信 息 ， 必 须 出 现在 起 始 标签 中 。 属 性 以 名 称 / 取 值 对 出 
名 称 与 取 值 之 问 用 等 号 “=” 分 隔 ， 并 用 引号 把 取 值 引 起 来 。 例 如 : 


<salary currency=“US$”> 25000 </salary> 


上 例 中 的 属性 说 明了 薪水 的 货币 单位 是 美元 。 

一 个 XML 文档 首先 要 满足 “格式 良好 ”的 要 求 。 具 体 包括 以 下 几 点 : 

(1) 根 元 素 唯 一 。 

(2) 起 始 标签 和 结束 标签 应 当 匹 配 ， 其 中 结束 标签 是 必 不 可 少 的 。 空 标识 是 指标 识 对 
之 间 没 有 内 容 的 标识 ， 其 必须 关闭 ， 如 <br>、<img> 等 标识 。 针 对 这 样 的 空 标识 ，XML 中 
的 处 理 方法 是 在 原 标识 最 后 加 /， 如 将 <br> 写 为 <br/>。 

(3) 大 小 写 应 一 致 。XML 对 字母 的 大 小 写 是 敏感 的 ，<employee> 和 <Employee> 是 完 
全 不 同 的 两 个 标签 ， 所 以 结束 标签 在 匹配 时 一 定 要 注意 大 小 写 一致 。 


现 
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(4) 元 素 应 正确 嵌 套 。 子 元 素 应 完全 包括 在 父 元 素 中 。<A><B></A></B> 就 是 嵌 套 
洪 误 。 

(5) 属性 值 必须 包括 在 引号 中 。 在 HTML 代码 中 ， 属 性 值 可 以 加 引号 ， 也 可 以 不 加 。 
但 是 在 XML 中 则 规定 所 有 属性 值 必须 加 引号 〈 可 以 是 单 引号 ， 也 可 以 是 双 引 号 ) ， 否 则 
将 被 视 为 错误 。 

(6) 元 素 中 的 属性 是 不 允许 重复 的 。 

XML 文档 的 “有 效 性 ”是 指 一 个 XML 文档 应 遵守 DTD 文件 或 Schema 的 规定 ，“ 有 
效 的 ”XML 文档 肯定 是 “格式 良好 的 ”。 本 章 将 主要 介绍 XML 数据 的 访问 处 理 ， 而 省 略 
DTD 和 XML Schema 的 介绍 ， 关 于 DTD 和 Schema 的 介绍 ， 读 者 可 参看 相关 书籍 。 


9.2 XML 文档 对 象 模型 


文档 对 象 模型 《Document Object Model，DOM) 是 对 Web 文档 进行 应 用 开发 、 编 程 
的 应 用 程序 接口 API) ， 是 W3C 公布 的 一 种 跨 平 台 的 、 与 语言 无 关 的 接口 规范 。 

DOM 采用 对 象 模型 和 一 系列 接口 来 描述 XML 文档 的 内 容 和 结构 ， 即 利用 对 象 把 文档 
模型 化 。DOM 对 结构 化 的 XML 文档 进行 解析 ， 文 档 中 的 指令 、 元 素 、 实 体 、 属 性 等 所 有 
个 体 都 可 以 用 对 象 模型 表示 ， 整 个 文档 的 逻辑 结构 类 似 一 棵 树 ， 如 图 9-1 所 示 ， 树 的 每 个 
结 点 均 代表 一 个 具体 对 象 ， 每 个 对 象 同时 包含 了 方法 和 属性 。 


图 9-1 DOM 结 点 树 型 层次 


利用 DOM， 开 发 人 员 可 以 进行 动态 地 创建 XML 文档 、 结 构 遍 历 、 添 加 /修改 /删除 内 
容 等 操作 。DOM 具有 的 面向 对 象 的 特性 使 人 们 在 处 理 和 解析 XML 相关 的 事务 时 可 节省 大 
量 精力 ， 是 一 种 符合 代码 重用 思想 的 强 有 力 的 编程 工具 。 

XML 文档 对 象 模型 由 以 下 几 种 基本 的 对 象 组 成 。 

(1) DOMDocument: 文档 对 象 ， 它 代表 整个 文档 树 的 顶级 结 点 ， 是 对 整个 文档 进行 
操作 的 入 口 。 

(2) XMLDOMNode: XML DOM 结 点 树 中 的 一 个 结 点 对 象 。 其 包括 Element 结 点 、 
Attribute 结 点 、Text 结 点 等 ， 其 中 ，Text 结 点 表达 了 元 素 或 属性 的 文本 内 容 ， 它 不 再 包含 
任何 子 结 点 。 

(3) XMLDOMNodeList: 若干 结 点 组 成 的 集合 。 
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(4) XMLDOMParseError: 一 个 无 内 容 的 对 象 ， 返 回 最 后 一 个 解析 错误 的 信息 。 
(5) XMLHTTPRequest: 允许 和 HTTP 服务 器 通信 。 


9.2.1 DOMDocument 对 象 


DOMDocument 对 象 是 XML 对 象 模型 中 的 基础 , 它 所 提供 的 属性 和 方法 可 以 实现 XML 
文件 的 加 载 和 保存 ， 并 可 浏览 、 查 询 和 修改 文档 树 的 结构 和 内 容 。 

1. 创建 DOMDocument 对 象 
在 Web 应 用 的 客户 端 和 服务 器 端 均 可 通过 系统 组 件 创建 DOMDocument 对 象 。 

(1) 如 果 浏 览 器 使 用 JavaScript 作为 脚本 语言 ， 则 可 用 如 下 代码 创建 XML 文档 对 象 : 
var xmlDoc=new ActiveXObject("Microsoft.XMLDOM") 

(2) 如 果 浏 览 器 使 用 VBScript 作为 脚本 语言 ， 则 可 用 如 下 代码 创建 XML 文档 对 象 : 
set xmlDoc=CreateObject("Microsoft.XMLDOM") 

(3) 在 ASP 程序 中 如 果 使 用 VBScript 脚本 语言 ， 则 可 用 如 下 代码 创建 XML 文档 对 象 ; 


set xmIDoc=Server.CreateObject("Microsoft.XMLDOM") 


2. DOMDocument 对 象 的 常用 属性 

(1) async: 表示 是 否 允许 异步 下 载 。 如 果 该 属性 设置 为 False， 则 确保 XML 解析 器 把 
XML 文档 完全 载 入 以 前 不 会 对 XML 文档 进行 解析 。 

(2) attributes: 返回 目前 结 点 的 属性 列表 。 

(3) documentElement: XML 文档 的 根 (Root) 结 点 。 

(4) readyState 属性 : XML 文件 的 加 载 状 况 。 该 属性 的 具体 取 值 说 明 如 表 9-1 所 示 。 


表 9-1 readyState 属性 的 取 值 说 明 


XML 对 象 被 产生 ， 但 没有 任何 文件 被 加 载 
加 载 程序 进行 中 ， 但 文件 尚未 开始 解析 

部 分 文件 已 经 加 载 且 进行 解析 ， 但 对 象 模型 尚未 生效 
对 象 模型 仅 对 已 加 载 的 部 分 文件 内 容 有 效 
文件 已 完全 加 载 ， 代 表 加 载 成 功 


INTERACTIVE 


(5) onreadystatechange 属性 : 指定 一 个 事件 来 处 理 onreadystatechange 事件 。 该 事件 
能 辨识 readyState 属性 的 改变 。 
3. DOMDocument 对 象 的 方法 


(1) 加 载 和 存储 XML 文档 
Load 和 loadXML 方法 可 装载 解析 XML 内容, 并 建立 DOM 对 象 。save 方法 可 将 DOM 
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转化 为 xml 文本 形式 存储 到 文件 中 。 


口 


load(url): 从 指定 位 置 加 载 XML 文件 。 


其 中 , 参数 url 包含 要 被 加 载 文档 的 URL 字符 串 。 若 文件 加 载 成 功 , 则 返回 值 为 True; 
否则 返回 值 为 False。 例 如 : 

<script type="text/javascript"> 

var xmlDoc = new ActiveXObject("Microsoft.XMLDOM") 

xmlDoc.async="false” 

xmlDoc.load("note.xml") // 载 入 文件 名 字 为 note.xml 的 XML 文档 

</script> 


口 
口 


loadXML(xmlString): 从 一 个 字符 串 加 载 XML 文本 。 
save(filepath): 将 XML 文档 以 文本 形式 存储 到 文件 中 。 


(2) 访问 XML 文档 树 


口 


其 中 ， 参 数 tagname 是 一 个 字符 串 ， 代 表 找 到 的 元 素 卷 标 名 称 。 使 用 tagname"*" 传 


getElementsByTagName(tagname): 返回 指定 名 称 的 元 素 集合 。 


孔 


文件 中 所 有 找到 的 元 素 。 
(3) 建立 新 结 点 


DOOODD 


922 


createAttribute(name): 建立 一 个 指定 名 称 的 属性 。 

createElement(tagName): 建立 一 个 指定 名 称 的 元 素 。 

createTextNode(data): 建立 一 个 新 的 text 结 点 ， 并 包含 指定 的 数据 。 
createNode(type,tagName,ns): 根据 指定 的 结 点 类 型 、 名 称 和 名 字 空 间 建 立新 结 点 。 
setAttribute(name,value): 设置 结 点 的 某 属 性 值 。 


XMLDOMNode 对 象 


XMLDOMNode 对 象 表示 树 中 的 一 个 结 点 ， 它 是 XML 对 象 模型 的 最 主要 对 象 ， 元 素 、 
属性 、 注 释 、 处 理 指令 等 均 能 以 XMLDOMMNode 来 表示 。 另 外 ，DOMDocument 对 象 就 是 
继承 自 XMLDOMNode 对 象 ， 所 以 这 里 介绍 的 方法 在 DOMDocument 对 象 中 也 能 使 用 。 


1. XMLDOMNode 对 象 的 属性 


(1 
(2 
(3 
(4 
(5 
(6 
(7 


) firstChild 属性 : 结 点 的 第 一 个 子 元 素 。 
previousSibling 属性 : 结 点 之 前 的 兄弟 结 点 。 
) nextSibling 属性 : 结 点 的 下 一 个 兄弟 结 点 。 
lastChild 属性 : 结 点 的 最 后 子 元 素 。 

) parentNode 属性 : 结 点 的 父 结 点 。 


_ 


_ 


) nodeName 属性 : 结 点 名 称 。 
) nodeType 属性 : 结 点 类 型 。 例 如 ，1 代表 元 素 (ELEMENT) 结 点 ，2 代表 属性 


(ATTRIBUTE) 结 点 等 。 


(8 


) nodeValue 属性 : 用 来 访问 属性 和 文本 结 点 的 值 。 
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(9) xml 属性 : 结 点 子 树 的 XML 描述 。 
(10) text 属性 : 结 点 子 树 所 包含 的 文字 。 
(11) childNodes 属性 : 结 点 的 所 有 子 结 点 的 集合 。 


【 例 9-2】 childNodes 属性 的 使 用 


- ex9-2.htm- 一 - 
<script language="javascript"> 
var xmlobj=new ActiveXObject("Microsoft. XMLDOM"); 
xmlobj.loadXML("<employees><employee><name> 张 三 </name> 
</employee><employee><name> 李 四 </name></employee></employees>"); 
var peoples= xmlobj.documentElement.childNodes; 
alert(peoples.item(0).text) 
alert(peoples.item(1).xml); 
</script> 


运行 结果 如 图 9-2 所 示 。 
[Microsoft Internet Fzpl 8 | 


AN 张 三 AN Cenployee Ynane 浪 四 (named enployse》 


图 9-2 输出 结 点 的 信息 

【说 明 】 通 常 遍历 访问 结 点 树 是 从 XML 文档 的 根 结 点 出 发 ， 用 XML 文档 对 象 的 
documentElement 属性 得 到 根 结 点 ， 也 就 是 <employees> 结 点 。 针 对 该 结 点 的 childNodes 属 
性 得 到 的 是 所 有 <employee> 结 点 的 集合 。 分 别 用 text 属性 和 xml 属性 输出 子 元 素 信 息 ， 比 
较 两 个 结果 的 差异 。 如 果 直 接 用 XML 文档 对 象 (xmlobj ) 访问 childNodes 属性 ， 则 得 到 的 
集合 中 只 包括 一 个 根 结 点 元 素 ， 即 <employees> 结 点 。 

2. XMLDOMNode 对 象 的 常用 方法 

(1) haschildnodes 方法 : 如 果 指定 的 结 点 有 一 个 或 更 多 子 结 点 ， 则 返回 值 为 True。 

(2) selectNodes(pattermString): 所 有 符合 pattemString 样式 的 结 点 的 集合 。 如 果 没 有 
符合 样式 的 结 点 ， 则 返回 空 的 集合 。 其 中 ,参数 pattemString 为 一 包含 XSL 样式 的 字符 串 。 

(3) selectSingleNode(patternString): 返回 第 一 个 符合 样式 的 结 点 。 如 果 没 有 符合 样式 
的 结 点 ， 则 返回 null。 其 中 ，pattemString 为 一 包含 XSL 样式 的 字符 串 。 

(4) appendChildnewChild): 加 上 一 个 结 点 当 作 指定 结 点 最 后 的 子 结 点 。 

(5) removeChild(oldChild): 将 指定 的 结 点 从 结 点 清单 中 移 除 。 其中，oldChild 为 一 个 
要 被 移 除 的 结 点 对 象 。 

(6) replaceChild(newChild, oldChild): 将 原来 的 子 结 点 以 新 的 子 结 点 取代 。 

(7) insertBefore(newChild, refChild): 将 新 结 点 插入 到 参考 结 点 的 前 面 。 若 参考 结 点 
省 略 ， 则 新 结 点 插入 到 所 有 子 结 点 的 前 面 。 

(8) transformNode(stylesheet): 使 用 提供 的 样式 表 来 处 理 该 结 点 及 其 子 结 点 。 其 中 ， 
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stylesheet 为 一 XML 文件 或 是 片断 包含 负责 结 点 转换 工作 的 XSL 元 素 。 此 方法 会 返回 一 包 
含 转换 结果 的 字符 串 。 
(9) getAttribute(attributeName): 读 取 结 点 某 属性 的 值 。 
以 下 例子 介绍 如 何 将 数据 库 表 中 的 数据 保存 到 XML 文件 中 。 
【 例 9-3】 将 数据 库 中 存储 的 单 选 题 转换 为 XML 形式 并 存储 到 XML 文件 中 
数据 库 表 格 〈dxt) 的 字段 说 明 如 表 9-2 所 示 。 


表 9-2 数据库 表格 (dxt) 的 字段 说 明 


对 应 XML 标识 
Point no 知识 点 point 
answer 标准 答案 | answer 
content 内 容 content 


转换 后 的 XML 文档 格式 如 下 : 


<questions> 
<question> 
<point>1-0-0</point> 
<content> 试 题 内 容 .…</content> 
<answer> A </anwer> 
</question> 


<questions> 


【说 明 】 根 结 点 为 questions， 每 道 试题 为 一 个 question 结 点 。 此 时 将 每 道 试题 的 各 字 
段 作 为 子 元 素 结 点 ， 也 可 以 作为 属性 结 点 ， 读 者 思考 如 何 表示 。 从 这 里 可 看 出 XML 标记 
也 可 以 是 中 文 名 称 。 

以 下 为 用 ASP 编写 的 转换 程序 代码 ， 它 将 从 数据 库 读 取 试 题 产 生 XML 文件 。 


一 ~----------@X9-3.9SPp--- 一 2 
<% 

set xmlDoc=Server.CreateObject("Microsoft. XMLDOM") 

xmlDoc.loadxml "<questions></questions>" "初始 文档 只 有 根 结 点 

file="data.mdb" 

connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 

Set Conn=Server.CreateObject("ADODB.connection") 


Conn.Open connstr "连接 数据 库 

sqlStr = "select * from dxt " 

set rs = Conn.Execute(sqlStr) ' 从 数据 库 读 取 试题 创建 记录 和 集 

do while not rs.EOF ' 从 记录 集 读 取 各 个 记录 的 数据 添加 到 XML 结 点 树 中 


set qNode = xmlDoc. createElement("question") 
xmlDoc.documentElement.appendChild(qNode) “添加 一 道 试题 
"试题 的 各 个 字段 作为 子 结 点 添加 到 question 结 点 上 

set childNode=xmlDoc. createElement("point ) 

childNode.text = rs ("point_no") 

qNode.appendChild(childNode) 
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set childNode=xmlDoc.createElement ("content") 
childNode .text =rs ("content") 
qNode.appendChild(childNode) 
set childNode=xmlDoc.createElement ("answer") 
childNode.text = ""&rs ("answer") 
qNode.appendChild(childNode) 
rs.MoveNext 
loop 
Conn.close 
xmlDoc.save Server.mappath ("exercise.xml") “保存 XML 数据 到 文件 中 
%> 


【说 明 】 首 先 利用 文档 对 象 的 loadXML 方法 并 根据 XML 文本 生成 文档 对 象 的 根 
questions， 然 后 在 此 基础 上 从 试题 库 读 取 试 题 产 生 一 个 个 元 素 结 点 并 添加 到 文档 中 ， 这 里 
利用 createElement 方法 创建 元 素 结 点 ， 利 用 结 点 的 appendChild 方法 将 元 素 结 点 添加 到 结 
点 树 的 对 应 位 置 。 最 后 ， 将 生成 的 XML 文档 保存 到 文件 中 。 


9.2.3 XMLDOMNodeList 对 象 


XMLDOMNodeList 是 结 点 集合 对 象 ， 该 对 象 通常 是 访问 结 点 的 ChildNodes 属性 ， 或 
者 使 用 结 点 的 selectNodes 方法 或 getElementsByTagName 方法 等 返回 的 结果 。 
1. XMLDOMNodeList 对 象 的 属性 
length 属性 是 XMLDOMMNodeList 对 象 的 唯一 属性 ， 返 回 集合 中 项 目的 个 数 。 
2. XMLDOMNodeList 对 象 的 方法 
(1) item(index): 以 顺序 编号 从 结 点 集合 中 取得 某 一 位 置 的 结 点 。 其 中 ，index 指定 子 
结 点 的 排序 位 置 ，0 对 应 第 一 个 子 结 点 。 
(2) nextNode0: 存 取 集合 中 的 下 一 个 结 点 ， 若 无 法 取得 下 一 个 结 点 ， 则 返回 null。 


9.3 XML 文档 的 显示 处 理 


XML 文档 用 来 表示 数据 信息 的 层次 结构 , 它 本 身 并 不 包括 任何 显示 信息 。 如何 将 XML 
数据 在 浏览 上 按 特 定 的 要 求 进行 显示 有 多 种 方法 : 最 简单 的 方法 是 用 CSS 进行 显示 处 理 ， 
但 因 其 处 理 能 力 有 限 ， 所 以 很 少 用 ， 最 常用 的 方法 是 用 XSL 变换 进行 XML 文档 的 显示 处 
理 。 另 外 ， 也 常用 XML DOM 访问 XML 文档 并 结合 DHTML 技术 实现 显示 处 理 。 


9.3.1 利用 CSS 显示 


1. 示例 
【 例 9-4】 利用 CSS 显示 XML 文档 
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(1) XML 文件 


-—-- -— student.xml-- 一 
<?xml version="1.0" encoding="gb2312" ?> 
<?xml-stylesheet type="text/css" href="mystyle.css"?> 
<roster> 
学 生花 名 册 
<student> 
<name> 李 华 </name> 
<origin> 河 北 </origin> 
<age>15</age> 
<telephone>62875555</telephone> 
</student> 
<student> 
<name> 张 三 </name> 
<origin> 北 京 </origin> 
<age>14</age> 
<telephone>82873425</telephone> 
</student> 
</roster> 


其 中 ， 第 二 行 指定 显示 样式 ， 如 果 缺 少 第 二 行 ， 则 按 浏览 器 默认 的 风格 显示 XML 文 
件 ， 如 图 9-3 所 示 。 


加 C:Documents and SettinesWdministrato. 
文 作 虽 。 机 纤 (E 查看 (WW 收 革 4) 工具 ” 注 党 


<pml version="1.0" encoding="gb2312 ?> 
-<rostor> 
学 生花 名 册 
~ <student> 
<name> 李 华 </name> 
<orign> 河 北 </arign> 
<age>15</age> 


<telephone>62875555</telephone> 
</student> 
- <student> 
<name> 张 三 </name> 
<orign> 北 京 </orign> 
<age>14</age> 


<telephone>82873425</telenhcne> 
</student> 
</roster> 


图 9-3 浏览 器 默认 按 树 型 结构 显示 XML 文档 
(2) CSS 样式 文件 


roster,student 
{ 
font-size:18pt; 
font-weight:bold; 
color:#008080; 户 青色 */ 
display:block; 


Hb 


origin,age,telephone 
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{ 
font-size:12pt; 
display:block; 
margin-left:20pt; text-decoration:underline 
} 
name 
{ 
font-size:14pt; 
display:block; 
color:#008000; 片 绿 色 */ 
margin-top:5pt; 
margin-left:8pt 
用 360 浏览 器 浏览 XML 文件 ， 运 行 结果 如 图 9-4 所 示 。 
隔 iie://Divstudent,aml - 360 安 全 训 响 器 3.15 工 式 版 wl-lo|lx 
BDO DOD/ MG 


EW Ote/oistuentum -x EY O000 
习 


图 9-4 用 CSS 显示 XML 文档 
【说 明 】 在 CSS 文档 中 对 XML 内 容 中 的 每 个 标记 定义 一 个 显示 样式 。 在 输出 结 点 文 
本 时 将 自动 套用 相应 的 样式 。 

2. 使 用 CSS 显示 XML 的 缺点 

使 用 CSS 显示 XML 数据 ， 能 力 非常 有 限 ， 主 要 缺点 如 下 : 

(1) XML 的 表现 依赖 浏览 器 对 CSS 的 支持 。 

(2) 只 能 规定 元 素 而 不 能 规定 属性 的 显示 样式 。 

(3) 每 个 输入 元 素 仅 能 处 理 一 次 。 

(4) 不 能 为 输出 添加 元 素 和 其 他 内 容 。 

(5) 不 能 实现 条 件 和 选择 处 理 。 


9.3.2 ”使 用 Xpath 查找 结 点 


Xpath 是 一 个 通用 的 查询 表示 语法 ， 用 于 查询 和 过 滤 XML 文件 的 结 点 。 在 Xpath 语法 
中 可 以 使 用 层次 结构 式 的 描述 方式 来 找 出 符合 条 件 的 结 点 。 例 如 ，book/author 表示 找 出 所 
有 book 之 下 的 author 结 点 。 
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所 有 Xpath 查询 都 发 生 在 一 个 特定 的 范围 内 ， 假 设 从 树 的 根 结 点 查找 所 有 名 为 X 的 结 
点 ， 可 能 返回 一 组 结果 ， 从 树 的 某 一 分 支 查 找 和 则 可 能 得 到 另 一 组 结果 。 

Xpath 除了 在 前 面 DOM 部 分 介绍 的 selectNodes 方 法 和 selectSingleNode 方 法 中 使 用 外 ， 
在 后 面 将 要 介绍 的 XSL 样式 语言 编程 中 也 会 用 到 。 

与 文件 系统 的 路 径 标 识 相似 ， 如 果 一 个 查找 方式 以 “/” 起 始 ， 则 表示 要 以 树 的 根 结 点 
及 其 所 包含 的 结 点 作为 查找 范围 ; 如 果 以 “/” 起 始 ， 则 表示 查找 不 限于 目前 这 一 层 ， 还 可 
包括 其 下 所 有 层 的 结 点 。 

以 下 结合 具体 样 例 介绍 Xpath 的 典型 使 用 。 设 有 如 下 XML 文档 : 


<Data> 
<item id="1"> 
<desc> 项 目 一 </desc> 
</item> 
<item id="2"> 
<desc> 项 目 二 </desc> 
<item id="1"> 
<desc> 子 项 目 一 </desc> 
</item> 
</item> 
</Data> 


此 时 item 标记 代表 一 个 项 目 ，desc 标记 代表 项 目的 描述 ， 因 此 该 XML 文档 的 结 点 树 示 
意图 如 图 9-5 所 示 。 在 该 示意 图 中 为 了 方便 描述 ， 不 妨 为 3 个 item 结 点 加 上 A、B、C 标识 。 


、 SC 
SS 
DD OS 

CD 


图 9-5 XML 文档 的 结 点 树 示意 图 
以 下 是 一 些 查 找 路 径 的 表达 样 例 , 其 中 root=xmlobj.documentElement, 也 即 root 为 XML 


文档 的 根 结 点 。 
口 ./item: 在 目前 结 点 下 寻找 所 有 item 结 点 。 例 如 : 


root.selectNodes("./item ") 
下 面 脚本 与 上 述 脚本 作用 等 价 。 


root.selectNodes("item") 
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结果 为 A、B 两 结 点 。 
口 /Witem: 在 XML 文档 中 寻找 所 有 item 结 点 。 例 如 : 


root.selectNodes("//item") 


结果 为 A、B、C 3 个 结 点 。 
口 item/desc: 找 出 item 结 点 下 的 desc 子 结 点 。 例 如 : 


root.selectNodes("item/desc") 


结果 为 A、B 下 的 desc 子 结 点 ， 不 包括 C 下 的 desc 子 结 点 。 
口 item[@id="1"]: 寻找 所 有 id 属性 值 为 1 的 item 结 点 ， 其 中 ， 符 号 @ 用 来 表示 后 面 
的 名 称 为 一 个 属性 。 例 如 : 
root.selectNodes("item[@id= '1]) 
结果 为 A 结 点 。 
这 里 ， 方 括号 用 来 限制 满足 条 件 的 特定 元 素 。 以 下 是 几 个 典型 实例 。 
争 ”选择 元 素 Data 中 的 第 一 个 item 结 点 : /Data/item[1] 
会 ”选择 元 素 Data 中 的 最 后 一 个 item 结 点 : /Data/item[last0] 
急 ”选择 元 素 Data 中 具有 desc 元 素 的 item 结 点 : /Data/item[desc] 
口 item[desc=" 项 目 一 "]: 寻找 子 结 点 desc 文本 内 容 为 “项 目 一 ”的 item 结 点 。 例 如 : 


root.selectNodes("item[desc= ' 项 目 一 ]) 
结果 为 A 结 点 。 
口 Data//desc: 找 出 Data 结 点 下 不 限 多 少 层次 结构 下 的 desc 结 点 。 例 如 : 
root.selectNodes("Data//desc") 
结果 为 A、B、C 下 的 desc 子 结 点 。 
口 Data/*/desc: 找 出 Data 结 点 的 孙子 辈 的 desc 结 点 。 其 中 ， 通 配 符 “*” 表 示 可 匹 
配 所 有 结 点 。 例 如 : 


root.selectNodes("Data/*/desc") 


结果 为 C 下 的 desc 子 结 点 。 
口 */desc: 找 出 所 有 desc 子 结 点 。 例 如 : 


root.selectNodes("*/desc") 


结果 为 A、B 下 的 desc 子 结 点 。 
口 item[@id and desc]: 找 出 含 id 属性 和 desc 子 结 点 的 item 元素。 例如: 


root.selectNodes("item[@id and desc] ) 


结果 为 A、B 结 点 。 
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口 “Datafitem]/desc: 找 出 包含 item 子 结 点 的 Data 结 点 下 的 desc 子 结 点 。 例 如 : 
root.selectNodes("Dataliteml]/desc ") 


结果 为 空 (null) 。 
口 Wdesc[=" 项 目 一 "]: 找 出 所 有 层次 下 结 点 内 容 为 “项 目 一 ”的 desc 结 点 。 此 时 “.” 
代表 当前 处 理 的 结 点 内 容 。 例 如 : 


root.selectNodes("//desc[.=' 项 目 一 ]") 


结果 为 A 结 点 下 的 desc 子 结 点 。 
Xpath 提供 了 很 多 函数 ,可 以 使 用 Xpath 函数 改进 Xpath 查询 , 提高 Xpath 的 编程 能 力 
和 灵活 性 。 以 下 列 出 部 分 常用 函数 的 功能 。 
count(node_set):; 求 node_set 参数 中 的 结 点 数 。 
last0): 求 结 点 集中 最 后 一 个 结 点 的 位 置 。 
name(): 求 当前 结 点 的 名 称 。 
position( ): 求 结 点 在 父 级 中 的 索引 号 。 
contains(string1,string2): 检查 第 一 个 参数 串 中 是 否 包含 第 二 个 参数 串 。 
translate(stringl,string2,string3): 返回 将 stringl 字符 串 中 所 有 出 现 的 string2 字符 串 
替换 为 string3 字符 串 后 的 结果 。 
在 正 浏 览 器 端 ，DOMDocument 对 象 默认 用 类 似 正 则 匹配 的 方法 来 进行 结 点 选取 。 要 
使 用 Xpath， 则 必须 通过 SelectionLanguage 属性 的 设置 将 Xpath 作为 默认 的 选择 语言 。 
【 例 9-5】 在 正 浏 览 器 端 使 用 Xpath 函数 
一 -一 -exX9-5 .htm-- 一 -一 -一 
<script type="text/javascript"> 
var xmldoc=new ActiveXObject('Microsoft.XMLDOM'); 
xmldoc.setProperty("SelectionLanguage", "XPath"); 
xmldoc.loadXML("<employees><employee><name> 张 三 </name></employee> 
<employee><name> 李 四 </name></employee></employees>"); 
var res = xmldoc.selectSingleNode("//employeellast()]"); 
document.write(res.text); 
res = xmldoc.selectSingleNode("//employee[contains(name,' 三 ")]"); 
document.write("<br>"+res .text); 


DOOOOO 


</script> 

在 浏览 器 页 面 输出 如 下 内 容 : 
李 四 

张 三 


【应 用 思考 】 利 用 contains 函数 可 实现 基于 关键 词 的 检索 ， 例 如 ， 网 络 课件 中 反映 章 
节 层 次 的 XML 文件 ， 每 个 章 、 节 结 点 均 有 标题 属性 ， 如 何 实现 查找 标题 中 含有 搜索 关键 
字 的 那些 结 点 ， 并 将 其 标题 和 内 容 的 URL 超 链接 在 页 面 上 列表 显示 出 来 。 
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9.3.3 利用 XSL 实现 显示 


1. XSL 简介 
XSL 是 专门 为 XML 设计 的 样式 语言 ， 主 要 包括 以 下 两 部 分 。 
(1) XSLT: 将 XML 源 代码 转换 为 另 一 种 格式 ， 此 时 新 的 格式 可 以 是 HTML 文档 ， 
也 可 以 是 新 的 XML 文档 等 。 
(2) XSL-FO: 提供 格式 化 命令 ， 设 定 外 观 样式 。 
XSL 内 容 非 常 丰富 ， 本 书 只 进行 概要 性 介绍 ， 有 兴趣 的 读者 可 参阅 相关 书籍 。XSL 进 
行 数据 内 容 转 换 的 突出 特点 是 将 模式 和 模板 相 结 合 ， 在 XSL 样式 文件 中 定义 一 系列 模板 ， 
XSL 处 理 器 根据 XML 数据 的 模式 寻找 匹配 的 模板 ， 根 据 模板 的 转换 输出 进行 数据 的 变换 
处 理 。XSL 的 基本 工作 原理 如 图 9-6 所 示 。XSLT 在 实施 转换 时 ， 使 用 Xpath 语言 来 定位 
XML 文档 的 元 素 。 


HIMLCSS (或 其 
他 的 表现 形式 ) 


XML 样式 表 


图 9-6 XSL 的 基本 工作 原理 
2. 应 用 举例 


【 例 9-6】 用 XSL 实现 XML 文档 显示 处 理 
首先 将 例 9-4 中 xml 文件 的 第 二 行内 容 改 为 如 下 代码 : 


<?xml-stylesheet type="text/xsI" href="mystyle.xsI"?> 


本 行 表示 用 mystyle.xsl 样式 文件 进行 XML 文档 的 显示 变换 。 
XSL 样式 文件 


一- 一- 一 一- 一- 一- 一 一 一 -一 一 一 -一 mystyle.Xsl 一 -一 -一 一 一 -一 一- 一 一 -一 -一 -一 -一 -一 -一 -一 - 
<?xml version="1.0" encoding="GB2312"?> 

<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl"> 
<xsl:template match="/"> 

<HTML><BODY> 

<table border="1"><tr> 

<td> 姓 名 </td><td> 籍 贯 </td><td> 年 龄 </td><td> 电 话 </td></tr> 
<xsl:for-each select="//student"> 

<tr><xsl:apply-templates /></tr> 

</xsl:for-each> 

<xsl:apply-templates select="//student[Iname=' 张 三 ]/*"/> 
<tr></tr> 

</table> 
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</BODY></HTML> 
</xsl:template> 
<xsl:template match="*"> 
<td><xsl:value-of/></td> 
</xsl:template> 
</xsl:stylesheet> 


运行 结果 如 图 9-7 所 示 。 

【说 明 】 本 例 定 义 了 两 个 模板 ， 一 个 是 用 于 匹配 根 结 点 的 (/) 模板 ， 另 一 个 是 可 匹配 
所 有 结 点 〈*#) 的 模板 。 模 板 匹 配 处 理 的 顺序 是 首先 从 XML 文档 的 根 结 点 出 发 ， 寻 找 匹 配 
模板 ， 根 据 根 结 点 模板 处 理 的 流程 顺序 处 理 整个 文档 ， 遇 到 apply-templates 处 理 语 句 再 查 
找 相应 的 匹配 模板 进行 处 理 。 可 以 看 到 ， 针 对 同一 文档 可 反复 引用 模板 。 

程序 中 ，<xsl:for-each select="//student"> 语 句 告 诉 XSLT 解析 器 ， 对 于 每 个 student 结 
点 都 必须 执行 一 段 变换 输出 程序 ， 即 <tr><xsl:apply-templates /></tr>。 

而 这 里 的 <xsl:apply-templates 人 将 对 每 个 student 结 点 的 元 素 结 点 应 用 后 面 定 义 的 一 个 
模板 输出 ， 该 模板 定义 中 的 “*” 代 表 可 匹配 所 有 元 素 。 

<xsl:template match="*"> 


<td><xsl:value-of/></td> 
</xsl:template> 


在 上 述 代 码 中 ，<xsl:value-of> 的 含义 是 输出 当前 结 点 的 文本 数据 。 

在 for-each 循环 之 后 的 apply-templates 语句 就 是 对 name 为 “ 张 三 ” 的 student 的 所 有 
元 素 (*) ， 应 用 模板 进行 匹配 处 理 。 如 果 将 该 行 写 成 如 下 形式 ， 则 表示 只 对 student 元 素 
结 点 进行 模板 匹配 。 

<xsl:apply-templates select="//student[name=' 张 三 ] "/> 

则 输出 结果 变 为 如 图 9-8 所 示 。 

XM ME 了 


隆 名 陋 页 诈 咒 | 电话 王 吾 财 豆 奋 柄 而 汉 
库 华 阿 北 |15 |62875555 摩 华 阿 北 [15 |62875555 


张 三 [ 北 京 [14 |82873425 砖 三 E 京 14 |82873425 
了 三 [北京 14 |82873425 账 三 北京 14 82873425 


图 9-7 XSL 变换 结果 显示 图 9-8 变换 后 的 结果 
3. XSL 的 优点 
XSL 是 功能 丰富 的 样式 转换 描述 语言 ， 更 多 的 内 容 可 参考 相关 书籍 。XSL 的 主要 优点 
如 下 : 
(1) 可 在 客户 端 或 服务 器 端 转换 ，XMLDOM 中 介绍 的 transformNode(stylesheet) 方 法 
就 是 针对 某 个 结 点 的 XML 子 树 的 内 容 应 用 某 个 XSL 样式 定义 进行 数据 内 容 的 变换 处 理 。 
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(2) 能 处 理 元 素 、 属 性 、 内 容 。 
(3) 能 为 输出 添加 内 容 。 

(4) 能 排序 或 过 滤 后 输出 。 
(5) 支持 条 件 、 循 环 处 理 。 
(6) 可 使 用 自 定 义 函 数 。 


Wan 


YW 


9.4 在 服务 器 端 访 问 和 处 理 XML 文档 


XML 广泛 用 于 数据 交换 处 理 ，XML 数据 在 某 种 程度 上 与 数据 库 是 对 应 的 。 在 实际 应 
用 中 也 可 以 利用 XML 实现 数据 的 管理 ， 以 下 结合 一 个 简单 的 应 用 样 例 介绍 利用 ASP 对 
XML 数据 进行 增 、 删 、 改 、 查 的 具体 处 理 方法 。 
【 例 9-7】 利用 XML 实现 班级 学 生 管理 
本 例 采用 XML 存储 数据 ， 读 者 可 通过 本 例 体会 在 服务 器 端 对 XML 数据 进行 增 、 删 、 
改 、 查 的 操作 。 
文件 1: XML 数据 存储 格式 
-class_students.xml--- 一 一 一 
<?xml version="1.0" encoding="gb2312"?> 
<classes> 
<class name=" 计 算 机 04-1"> 
<student name=" 张 三 " sex=" 男 " /> 
<student name=" 张 微 " sex=" 女 " /> 
</class> 
<class name=" 计 算 机 04-2"> 
<student name=" 王 五 3" sex=" 男 " /> 
<student name=" 李 四 " sex=" 女 " /> 
</class> 
</classes> 


1. 数据 查询 功能 一 一 查询 某 班 学 生 名 单 
功能 要 求 : 通过 下 拉 列 表 框 选择 班级 ， 将 列 出 该 班 所 有 学 生 的 名 单 。 
文件 2: search.asp 程序 


search.asp---- 一 - -一 --- - - - 
<form method="post" action="search.asp"> 
<% set xmIlDoc=Server.CreateObject("Microsoft. XMLDOM") 

xmlDoc.load(Server.MapPath("class_students.xml")) 

set allclass= xmlDoc.selectNodes("//class") 
%> 
<select name="classname" size="1" > 

<% for each bj in allclass 
bjname=bj.getAttribute("name") 
%> 
<option value="<%=bjname%>" <%if request("classname")=bjname then%> 
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selected<%end if%>><%=bjname%></option> 
<%next%> 
</select> 
<input type=submit name="search" value=" 查 询 "> 
</form> 


<!-- 以 下 根据 选择 的 班级 查找 出 本 班 学 生 并 显示 --> 

<% if request("classname")<>"" then 
set xmlDoc=Server.CreateObject("Microsoft. XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set sts= xmlDoc.selectSingleNode( Wclass[@name=” 

&request("classname")&"]").childNodes 
%> 

<table width="80%" border=1 > 

<tr><td> 姓 名 </td><td> 性 别 </td></tr> 

<% for each student in sts%> 

<tr><td><%=student.getAttribute("name")%></td> 

<td><%=student.getAttribute("sex")%></td></tr> 


<%next%> 
</table> 
<%end if%> 
运 和 了 结果 如 图 9-9 所 示 。 
ETEEDTTTITTETETTECE 二 | 双 
| 文件 中 编 加 EE) 查看 WW 收 意 疏 工具 ID 开导 
Jj 地址 | 乱 ] http://1ocalhost/x/search asp "| 加 条 
计 相 机 04-1 司 
姓名 性 别 


砖 三 男 
张 微 区 
下 
EE 


图 9-9 查询 班级 学 生 


【说 明 】 这 是 一 个 自 提交 的 应 用 ， 在 表单 中 通过 一 个 下 拉 列 表 框 列 出 所 有 班级 供 选择 ， 


后 面 的 一 段 代码 通过 条 件 限制 只 在 选择 了 班级 并 提交 表单 后 才 会 执行 ， 班 级 和 班级 学 生 均 
从 同一 XML 文件 中 查询 得 到 。 仔 细 体 会 Xpath 的 表示 形式 及 selectNodes 方法 和 
selectSingleNode 方法 的 选择 。 


2. 数据 添加 一 一 在 某 班 增 加 一 个 学 生 
功能 要 求 : 在 数据 录入 表单 提供 选择 班级 、 输 入 姓名 、 人 性 别 等 输入 控件 ， 表 单 提交 后 


将 数据 写 入 XML 文档 。 


文件 3: inputstudent.asp 程序 


ER --inputstudent.asp------ > 
<form method="post" action="inputstudent.asp"> 
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<table width="80%" border=1 > 
<tr><td> 班 级 </td><td> 
<% set xmIDoc=Server.CreateObject("Microsoft. XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xmlI")) 
set allclass= xmlDoc.selectNodes("//class") 
%> 
<select name="classname" size="1" > 
<% for each bj in allclass 
bjname=bj.getAttribute("name") 
%> 
<option value="<%=bjname%>" <%if request("classname")=bjname then% 
selected<%end if%>><%=bjname%></option> 
<%next%> 
</select></td></tr> 
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> 


<tr><td> 姓 名 </td><td><input type=text size=10 name="studentname"></td></tr> 


<tr><td> 性 别 </td><td><input type=text size=10 name="sex"></td></tr> 
</table> 

<input type=submit name="input" value=" 提交 "> 

</form> 


<!-- 以 下 将 表单 数据 写 入 XML 文档 --> 

<%if request("input")<>"" then 
set xmlDoc=Server.CreateObject("Microsoft.XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set sts = xmlDoc.selectSingleNode("//class[(@name=" 

&request("classname")&"]") 

set tmpNode = xmlDoc.createNode("element","student",”"") 
sts.appendChild(tmpNode) 
tmpNode.setAttribute "name",request("studentname") 
tmpNode.setAttribute "sex",request("sex") 
xmldoc.save(Server.MapPath("class_students.xml")) 

end if 

%> 


【说 明 】 本 例 也 是 一 个 自 提交 的 应 用 ， 前 面部 分 为 一 个 数据 录入 表 间 


和 ， 后 面部 分 为 将 


表单 提交 的 数据 写 入 XML 文档 。 仔 细 体 会 如 何 创建 新 的 学 生 结 点 ， 并 力 
结 点 上 ， 以 及 如 何 为 结 点 设置 属性 ， 最 后 如 何 保存 XML 文档 到 文件 中 。 


3. 数据 删除 处 理 一 一 删除 某 班 的 某 个 学 生 


0 入 到 本 班 的 班级 


功能 要 求 : 提供 一 个 下 拉 列 表 框 用 来 选择 班级 ， 在 表格 中 列 出 班级 学 生 ， 并 为 每 个 学 


生 安 排 一 个 删除 超 链 接 ， 单 击 该 超 链 接 可 将 相应 学 生 删 除 。 
文件 4: delstudent.asp 程序 


~ delstudent.asp--- 一 -一 -一 一 一 


<form method="post" action="delstudent.asp"> 

<%set xmIlDoc=Server.CreateObject("Microsoft. XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set allclass= xmlDoc.selectNodes("//class") 
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%> 
<select name="classname" size="1" > 
<% for each bj in allclass 
bjname=bj.getAttribute("name") 
%> 
<option value="<%=bjname%>" <%if request("classname")=bjiname then%> 
selected<%end if%>><%=bjname%></option> 
<%next%> 
</select> 
<input type=submit name="search" value=" 查 询 "> 
</form> 


<!-- 以 下 根据 选择 的 班级 查找 出 本 班 学 生 并 显示 --> 
<%if request("classname")<>"" then 
set sts= xmlDoc.selectSingleNode("//class[(@name=" 
&request("classname")&"]").childNodes 
%> 

<table width="80%" border=1 > 

<tr><td> 姓 名 </td><td> 性 别 </td><td></td></tr> 

<% k=0 

for each student in sts%> 

<tr><td><%=student.getAttribute("name")%></td> 

<td><%=student.getAttribute("sex")%></td> 

<td><a href="delprocess.asp?classname=<%=request("classname")%> 
&xh=<%=k%>"> 删 除 </a></td> 

</tr> 

<%k=k+1 

next%> 

</table> 

<%end if%> 


【说 明 】 本 程序 与 前 面 的 查询 各 序 的 代码 基本 相同 ， 只 是 企 
学 生 的 超 链 接 。 注 意 为 超 链接 传递 参数 ， 以 便 删除 程序 进行 处 理 。 
文件 5: delprocess.asp 程序 


个 学 生 后 跟 有 一 个 删除 


和 ---delprocess.asp--- 一 -一 -一 -一 -一 -一 -一 一- 一 一 -一 -一 
<% set xmlDoc=Server.CreateObject("Microsoft. XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set bj= xmlDoc.selectSingleNode("//class[@name="& 
request("classname")&"]") 
set students=bj.childNodes 
k=cint(request("xh")) 
set student=students.item(k) 
bj.removeChild(student) 
xmlDoc.save(Server.MapPath("class_students.xml")) 
response.redirect("delstudent.asp?classname="&request("classname")) 
%> 


【说 明 】 根 据 超 链接 传递 的 班级 和 学 生 参 数 将 该 班 的 某 个 学 生 结 点 从 XML 文档 中 删 
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除 ， 注 意 ， 学 生 参 数 传递 的 是 学 生 在 班级 内 的 结 点 序号 ， 仔 细 体 会 如 何 从 集合 中 按 序号 访 


问 一 个 元 素 结 点 。 最 后 , 将 XML 文档 保存 到 文件 中 ， 网 页 习 


4. 数据 修改 处 理 一 一 修改 某 
功能 要 求 : 选择 班级 ， 列 出 纪 


向 到 本 班 学 生 删 除 显示 页 面 。 
个 学 生 的 信息 
级 的 学 生 ， 并 对 每 个 学 生 提 供 一 个 修改 超 链 接 ， 单 击 超 


链接 进入 该 学 生 信 息 修改 页 面 ， 在 修改 页 面 将 提供 一 个 数据 编辑 表单 ， 表 单 中 将 列 出 学 生 
的 原来 信息 ， 学 生 对 信息 修改 后 单 击 “ 提 交 ” 按 钮 ， 将 在 modify.asp 程序 中 根据 修改 信息 


更 新 XML 文件 。 
文件 6: search2.asp 程序 


一 一 一 一 5earch2.asp- 一 -一 - es 


<form method="post" action="modify_student.asp"> 


<% 
set xmlDoc=Server.CreateObject 


("Microsoft.XMLDOM") 


xmlDoc.load(Server.MapPath("class_students.xml")) 
set allclass= xmlDoc.selectNodes("//class") 


%> 


<select name="classname" size="1" > 


<% for each bj in allclass 


bjname=bj.getAttribute("name") 


%> 
<option value="<%=bjname%: 


>" <%if request("classname")=bjname then%> 


selected<%end if%>><%=bjname%></option> 


<%next%> 
</select> 


<input type=submit name="search" value=" 查 询 "> 


</form> 


<!-- 以 下 根据 选择 的 班级 查找 出 本 班 学 生 并 显示 --> 

<%if request("classname")<>"" then 
set xmIlDoc=Server.CreateObject("Microsoft. XMLDOM") 
xmlDoc.load(ServerMapPath("class_students.xml")) 
set sts= xmlDoc.selectSingleNode("//class[@name=" 


&request("classname" 
%> 
<table width="80%" border=1 > 


")8"]").childNodes 


<tr><td> 姓 名 </td><td> 性 别 </td><td></td></tr> 


<% k=0 
for each student in sts%> 


<tr><td><%=student.getAttribute("name")%></td> 

<td><%=student.getAttribute("sex")%></td> 

<td><a href="modify.asp?classname=<%=request("classname")%> 
&xh=<%=k%>"> 修 改 </a></td> 


</tr> 
<9%k=k+1 
next%> 
</table> 
<%end if%> 
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【说 明 】 本 例 与 前 面 的 班级 学 生 查 询 程序 基本 相同 ， 只 是 在 显示 一 个 学 生 时 提供 一 个 
修改 该 学 生 信息 的 超 链 接 。 
文件 7: modify.asp 程序 


1 2 - modify .asp------ 一 -一 -一 -一 -一 -一 -一 -一 -一 -一 -一 -- 
<% set xmIlDoc=Server.CreateObject("Microsoft.XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set bj= xmlDoc.selectSingleNode("//class[(@name="& 
request("classname")&"]") 
set students=bj.childNodes 
k=cint(request("xh")) 
set student=students.item(k) 
name=student.getAttribute("name") 
sex=student.getAttribute("sex") 
age=student.getAttribute("age") 
%> 
<!-- 以 下 将 学 生 信 息 在 表单 输入 框 中 显示 --> 
<form method="post" action="modiwrite.asp"> 
<table width="80%" border=1 > 
<tr><td> 班 级 </td><td><select name="classname" size="1" > 
<% for each bj in allclass 
bjname=bj.getAttribute("name") 
%> 
<option value="<%=bjname%>" 
<%if request("classname")=bjname then%> selected 
<%end if%>><%=bjname%></option> 
<%next%> 
</select></td></tr> 
<tr><td> 姓 名 </td><td> 
<input type=text size=10 name="studentname" value=<%=name%>></td></tr> 
<tr><td> 性 别 </td><td> 
<input type=text size=10 name="sex" value=<%=sex%>></td></tr> 
<tr><td> 年 龄 </td><td> 
<input type=text size=10 name="age" value=<%=age%>></td></tr> 
</table> 
<input type=hidden name="xh" value=<%=k%>> 
<input type=submit name="input" value=" 提交 "> 
</form> 


【说 明 】 根 据 URL 参数 传递 的 班级 和 学 生 序号 访问 XML 文档 ， 从 班级 中 得 到 指定 的 
学 生 结 点 ， 读 取 结 点 的 相关 属性 ， 在 修改 表单 中 显示 学 生 的 数据 。 
文件 8: modiwrite.asp 程序 


-一 -- modiwrite .asp---- 一 -一 -一 -一 -一 一 一- 一- 一- 一 -一 
<% set xmIDoc=Server.CreateObject("Microsoft.XMLDOM") 
xmlDoc.load(Server.MapPath("class_students.xml")) 
set bj= xmlDoc.selectSingleNode("//class[@name="& 
request("classname")&"]") 
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set students=bj.childNodes 

k=cint(request("xh")) 

set student=students.item(k) 

student.setAttribute "name",request("studentname") 

student.setAttribute "sex",request("sex") 

student.setAttribute "age",request("age") 

xmlDoc.save(Server.MapPath("class_students.xml")) 

response.redirect("modify_student.asp?classname="&request("classname")) 
%> 


【说 明 】 根 据 提交 的 学 生 信 息 修改 XML 文档 的 内 容 ， 处 理 完毕 后 重 定向 到 修改 选择 
页 面 。 


9.5 在 客户 端 访问 和 处 理 XML 文档 


9.5.1 通过 脚本 装载 和 处 理 XML 文档 


可 以 使 用 JavaScript 语言 来 显示 XML 数据 。 
【 例 9-8】 利用 JavaScript 访问 XML 文档 实现 交互 做 题 


doexercise.htm-- 一 一 一 一 一 
<html> <head> 
<script type="text/javascript"> 
var pos=0; // 当 前 所 做 试题 的 序号 
function init() { 
var xmldoc = new ActiveXObject("Microsoft.XMLDOM") 
xmldoc.async="false" // 关 闭 异 步 载 入 
xmldoc.load("exercise.xml") // 载 入 名 字 为 exercise.xml 的 XML 文档 
qNodes = xmldoc.selectNodes("//question[point="1-0-0""); 
// 选 取 当 前 学 习 知 识 点 的 试题 ， 假 设 当前 学 习 知 识 点 为 1-0-0 


total= qNodes .length; // 求 试题 数量 

display(); // 显 示 第 1 道 试题 的 序号 和 试题 内 容 
} 
function check(x) { // 检 查 用 户 解答 的 正确 性 


answer=qNodes.item(pos).childNodes. selectSingleNode("answer").text; 
if (x.value== answer){ 
alert(” 对 1"); 
}else{ 
alert(" 错 中); 
} 
} 
function move(f) { // 移 动 试题 ， 根 据 f 的 值 改变 试题 序号 pos 值 
if (f==0) 
pos=0; 
if (f==2) 
pos=total-1; 
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if (f==-1)&& 
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(pos > 0)) 


pos=pos-1; 
if ( (f==1)&&(pos<total-1)) 


pos=pos+ 


function display(){ /显示 当前 试题 的 序号 和 内 容 


} 


document.al 


lnumber.innerHTML="<font color=blue> 共 有 "+total+" 题 </font>， 第 "+(pos+1)+" 题 "; 


content.innerHTML="<pre>"+ qNodes.item(pos).childNodes.item(1).text+"</pre>"; // 显 示 试题 内 容 


</script> 
</head> 
<body onload="init()" > <center> 

<!-- 以 下 定义 显示 试题 序号 和 试题 内 容 的 层 --> 
<div id="number ></div> 

<div id="content" align=left></div> 

<!-- 以 下 为 试题 解答 和 翻动 试题 表单 --> 
<form> 
<table width="60%" border ="0"> 
<tr> 
<td align=center>A 

<input type="radio" name="ans" value="A" onclick="check(this)"></td> 
<td align=center>B 

<input type="radio" name="ans" value="B" onclick="check(this)"> 
</td> 
<td align=center>C 

<input type="radio" name="ans" value="C" onclick="check(this)"></td> 
<td align=center>D 

<input type="radio" name="ans" value="D" onclick="check(this)"> 
</td> 
<td align=center>E 

<input type="radio" name="ans" value="E" onclick="check(this)"></td> 
</table> <p> 
<input type="reset" value=" 第 一 题 " onclick="move(0)" /> 
<input type="reset" value=" 上 一 题 " onclick="move(-1)" /> 
<input type="reset" value=" 下 一 题 " onclick="move(1) /> 
<input type="reset" value=" 最 后 题 " onclick="move(2)" /> 
</form> 
</body> 
</html> 


如 图 9-10 所 示 为 网 络 教学 系统 中 单 选 练习 的 界面 。 

【说 明 】XML 文档 的 格式 见 例 9-3。 本 例 编写 了 如 下 几 个 JavaScript 函数 : 
display 函数 负责 当前 序号 的 试题 的 显示 处 理 。 

move 函数 根据 参数 值 更 改 当前 试题 序号 ， 实 现 试 题 的 翻动 处 理 。 


口 


局: 名 : 扎 


check 池 
init 函数 


数 根据 用 户 的 解答 选择 与 标准 答案 进行 比较 ， 给 出 对 错 提示 。 
于 完成 初始 化 处 理 ， 包 括 加 载 试 题 的 XML 文档 、 选 取 当 前 知识 点 的 试 


题 和 调 


display 方法 显示 第 1 道 试题 。 
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习 字 生 氛 作 种 分 -章节 末 单 导航 学 习 方式 ~ 有 ES 
| 文件 四 ”编辑 E) 查看 WD 收 豪 ) 工具 D) 帮助 0 
[ET] rr EBEI 


共有 5 题 ， 第 4 是 
执行 以 下 代码 段 后 ， x，a, 和 b 的 值 为 ? 
=7; 


1. int x, a= 6, 
2. zx = at+ + b++i 


SNAPP 


AC BC CC DC EC 
| El Fal| sl| 
[il ls 
图 9-10 单 选 练习 界面 
显示 处 理 采 用 层 定 义 实现 ， 包 括 显示 试题 序号 的 层 number 和 显示 试题 内 容 的 层 content， 

试题 解答 的 选项 按钮 和 翻动 试题 的 按钮 通过 定义 onclick 事件 处 理 方法 实现 相应 的 处 理 。 此 
时 在 check 和 move 函数 设计 中 采用 了 两 种 典型 的 参数 传递 处 理 , 前 者 采用 传递 事件 源 对 象 
(this) ， 后 者 传递 代表 性 数值 。 读 者 可 考虑 对 程序 做 些 改 动 ， 修 改 参 数 传递 设计 ， 分 别 在 
函数 定义 处 和 调用 处 做 修改 。 


网 可 仿 站 点 


9.5.2 XML 数据 岛 


1. XML 数据 岛 的 定义 方式 
XML 数据 岛 就 是 指 将 XML 文档 加 入 到 HTML 页 面 文件 中 ， 它 以 <XML> 标 记 开头 ， 
在 HTML 页 面 文档 中 通过 ID 属性 给 定 的 名 称 引用 数据 岛 。 其 具体 定义 方式 有 以 下 两 种 : 
(1) 将 整个 XML 数据 岛 直接 写 入 到 HTML 文件 中 。 
例如 ， 记 录用 户 电话 号 码 的 XML 数据 岛 。 


<XML ID="xmldso"> 
<?xml version="1.0" encoding="gb2312"?> 
<user_phone> 
<user> 
<name> 张 三 </name> 
<telphone>59313</telphone> 
</user> 
<user> 
<name> 李 四 </name> 
<telphone>59323</telphone> 
</user> 
<!-- 其 他 user.….. -> 
</user_phone> 
</XML> 
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(2) 外 部 联接 方式 ， 将 以 上 内 容 保存 到 customer.xml 文件 中 ， 然 后 通过 数据 岛 定义 语 
句 中 的 SRC 属性 引用 一 个 外 部 的 XML 文件 。 例 如 : 
<XML ID="xmldso” SRC="customer.xml"> </XML> 
甚至 可 以 通过 访问 数据 库 动 态 产生 XML 数据 源 。 当 然 ， 产 生 的 数据 格式 要 符合 XML 


<XML ID="xmldso” SRC="getdata.asp"> </XML> 


2. 利用 文档 对 象 模型 访问 数据 岛 数据 

XML 文档 在 结构 上 为 树 型 层次 结构 ， 利 用 文档 对 象 模型 (DOM) 可 访问 XML 中 的 数 
据 。 要 得 到 数据 岛 的 根 结 点 有 两 种 方法 : 一 种 方法 是 通过 XMLDocument 属性 ; 另 一 种 方 
法 是 通过 documentElement 属性 。 例 如 ， 以 下 两 条 语句 均 可 得 到 根 结 点 对 应 的 文档 内 容 。 


document.all("xmlid").XMLDocument.nodeValue; 
xmlid.documentElement.text; 


从 根 结 点 出 发 ， 借 助 DHTML 技术 可 动态 地 通过 DOM 模型 访问 XML 数据 岛 的 数据 ， 
实现 网 页 中 的 交互 性 要 求 。 
【 例 9-9】 搜索 与 关键 字 匹 配 的 教学 知识 点 
以 下 XML 数据 岛 中 包含 有 教学 章节 目录 ， 每 个 node 结 点 代表 章节 目录 树 中 的 一 个 知 
识 点 , 知识 点 之 间 的 包含 关系 根据 node 结 点 的 包含 层次 进行 划分 。 每 个 结 点 有 title 属性 表 
示 结 点 标题 url 属性 表示 描述 结 点 内 容 的 URL 地 址 。 在 进行 关键 词 查找 时 ， 不 区 分 大 小 写 。 


<XML ID="xmldso"> 
<?xml version="1.0" encoding="gb2312"?> 
<directory> 
<node title="Java 语言 概述 " url="text1-0-0.htm"> 
<node title="Java 开发 和 运行 环境 " url="text1-1-0.htm"/> 
<node title="Java 语言 的 特点 " url="text1-2-0.htm"/> 
</node> 
<node title=" 类 与 对 象 " url="text2-0-0.htm"> 
</node> 
</directory> 
</xml> 
<script type="text/javascript"> 
function process() { 


var disp="; // 用 于 拼接 要 显示 的 内 容 
var x = point.value; 1/ 获取 输入 关键 词 
var root = xmldso.documentElement; /XML 数据 岛 的 根 结 点 


if (x==”) { alert(" 请 输入 搜索 知识 点 ");return false;} 
var mynodes = root.selectNodes("//node"); 
if (mynodes.length==0) 
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disp=disp+" 无 相关 知识 "; 
else{ 
disp=disp+"<ul>"; 
Var c=0; 
for (var k=0; k<mynodes.length; k++) { // 循 环 检查 所 有 结 点 
var mytitle = mynodes .item(k).getAttribute("title"); 
var t1 = mytitle.toLowerCase(); 


var t2 = x.toLowerCase(); // 将 数据 转化 为 小 写 
if (t1.indexOf(t2)>=0) { /查找 标题 中 是 否 含 有 要 找 的 关键 词 
C=c+1; 


var myurl = mynodes.item(k).getAttribute("url"); 
disp = disp+"<li style='color: #FF0000'><a href="+myurl+">"+mytitle+"</a></li>"; 
b 
} 
if (c==0) disp = disp+" 无 相关 知识 "; 
disp=disp+"</ul>"; 
} 
res.innerHTML=disp; 
return false; 
} 
</script> 
</head> 
<body> 
<P ALIGN=CENTER> 
<table width="35%"> 
<td align=middle> ”<!-- 以 下 为 输入 知识 点 的 文本 框 --> 
<input name="point" id="point" type=text size=20> 
</td><td align=left> 
<INPUT type=button onclick="process()" name="s1" value= 搜 索 > 


</td> 

</table> 

</P> <div id="res" ></div> 

</body> 

</html> 

图 9-11 所 示 为 网 络 教学 系统 中 的 知识 搜索 界面 。 
| 
| 文件 四 编 各 加 查看 四 收藏 W) 工具 帮助 如 | 


| [ME | hs /focahost /stodert_ae es 


E= 本 3 


| 


加 可 站 


图 9-11 网 络 教 学 系统 中 的 知识 搜索 界面 
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【说 明 】 页 面 中 藤 入 了 一 个 JavaScript 函数 process0， 其 功能 是 将 用 户 输入 的 关键 词 与 


XML 数据 岛 中 各 结 点 的 tile 属性 值 进行 比较 ， 如 果 能 查询 到 ， 则 在 页 面 的 res 标识 位 置 显 
示 匹 配 结 点 的 URL 超 链接 ， 否 则 显示 “无 相关 知识 ”。 


3. 数据 岛 数据 与 HTML 文档 的 捆绑 
XML 数据 岛 中 的 数据 可 以 通过 与 特定 HIML 元 素 的 捆绑 实现 数据 显示 。 
(1) 用 表格 进行 数据 捆绑 
以 前 面 的 XML 文档 为 例 ， 表 格 的 列 对 应 user 的 各 个 域 ， 而 行 则 对 应 每 个 user 的 数据 


记录 。 通 过 表格 的 datasrc 属性 指定 XML 数据 源 对 象 , 在 表格 栏 中 通过 <span> 元 素 的 datafld 
属性 捆绑 user 的 数据 域 。 例 如 : 


<XML ID="xmldso” SRC="customer.xml"> </XML> 
<center> 

<table datasrc="#xmldso" border="1"> 

<tr align="left" > 

<td><span datafld="name"></span></td> 
<td><span datafld="telphone"></span></td> 

</tr> 

</table> 

</center> 


执行 以 上 代码 后 将 会 在 表格 中 显示 所 有 user 的 数据 。 运 行 结 果 如 图 9-12 所 示 。 
根据 应 用 需要 ， 可 以 实现 翻 页 显示 ,通过 <TABLE> 标 记 中 的 DATAPAGESIZE 属性 可 


指定 每 页 的 大 小 ， 即 每 页 显示 的 数据 行 数 : 


<table id="my" datasrc="#xmldso" datapagesize="5" > 
并 在 页 面 中 安排 实现 翻 页 功能 的 按钮 控件 : 


<input type=Button VALUE=" 上 一 页 ” onclick="my.previousPage()"> 
<input type=Button VALUE=" 下 一 页 ” onclick="my.nextPage()"> 
<input type=Button VALUE=" 第 一 页 ” onclick="my.firstPage()"> 
<input type=Button VALUE=" 最 后 一 页 ” onclick="my.lastPage()"> 


对 于 含有 主子 表格 关系 的 XML 数据 岛 的 数据 ， 有 时 需要 对 记录 集 数据 按 主 子 关联 显 


示 。 例 如 ， 以 下 XML 数据 岛 表 示 了 一 个 学 校 的 若干 班 ， 每 个 班 有 若干 学 生 。 


<XML ID="XMLID"> 
<school> 
<class> 
<name> 计 算 机 99-1</name> 
<student> 
<name> 张 三 </name> 
<sex> 男 </sex> 
</student> 
<student> 
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<name> 李 四 </name> 
<sex> 男 </sex> 
</student> 
</class> 
<class> 
<name> 计 算 机 99-2</name> 


</school> 
</XML> 


为 了 实现 如 图 9-13 所 示 的 主子 关联 显示 ， 需 要 表格 套 表格 。 外 层 表 格 的 datasrc 为 数 
站 岛 标识 ， 内 层 表格 的 datasrc 也 为 数据 岛 标识 , 但 要 在 DATAFLD 属性 中 指定 子 记 录 集 对 
应 的 数据 域 。 此 时 显示 班级 学 生 的 子 表 中 通过 表格 的 DATAFLD 捆绑 student 数据 域 。 
马 D:vz-hta - Wicros... 攻 ] 操 区 | 
文件 中 编辑 E) 查看 ” 请 接 ” 克 
EEC 计算 机 99-1 各 办 
ESE3SIEE T 丰 了 区 


砖 三 |59313 
摩 四 |59323 


图 9-12 用 表格 绑 定 XML 数据 岛 图 9-13 主子 关联 显示 
旦 序 代码 如 下 : 


<table border="1" datasrc="#XMLID" > 
<td><span datafld="name"></span></td> 
<td> 

<table border="1" datasrc="#XMLID" datafld="student"> 
<tr><td> 

<span datafld="name"></span> 
</td><td> 

<span datafld="sex"></span> 

</td> 

</table> 

</table> 


(2) 用 <span> 或 <div> 标 记 绑 定单 个 记录 的 数据 
如 果 不 使 用 表格 来 显示 XML 数据 ， 则 可 以 在 HTML 文件 中 自由 安排 XML 数据 岛 数 
据 的 显示 位 置 。 通 过 页 面 中 <span> 或 <div> 元 素 的 datasrc 属性 指定 要 捆绑 的 数据 岛 ， 并 通 
过 datafld 属性 指定 数据 域 。 但 必须 注意 的 是 ， 这 种 方式 一 次 只 能 显示 一 个 子 结 点 的 数据 ， 一 
个 子 结 点 对 应 整个 数据 岛 记录 集 的 一 个 记录 ， 借 助 数据 岛 的 记录 集 对 象 实现 对 数据 岛 数 据 
的 遍历 访问 。 通 过 JavaScript 脚本 调用 数据 岛 记录 集 对 象 的 movenext0 和 moveprevious() 等 
方法 可 实现 记录 指针 的 前 后 翻动 ， 形 式 上 类 似 ASP 的 ADO 记录 集 的 访问 。 实 际 上 ， 这 里 
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的 记录 集 的 属性 和 方法 与 ADO 中 记录 集 的 属性 和 方法 是 一 致 的 ， 即 含有 EOF、PageSize、 
RecordCount、PageCount 等 属性 ， 同 时 也 含有 addNew、delete、move、find 等 方法 。 


【 例 9-10】 通过 数据 岛 记录 集 指针 的 前 后 移动 查看 记录 


三 和 ON 


<xml src="customer.xml" id="xmldso" async="false"></xml> 
<html> <head> 
<script type="text/javascript"> 
function movenext() { 

x=xmldso.recordset 

if (x.absoluteposition < x.RecordCount}X{ 

x.movenext() 

} 

b 


function moveprevious(){ 

x = xmldso.recordset /访问 记录 集 

if (x.absoluteposition > 1){ 

x.moveprevious() 

} 
b 
</script> 
</head> 
<body> 
<p> 用 户 名 : 
<span datasrc="#xmldso" datafld="name"></span> 
<br/> 电话 : 
<span datasrc="#xmldso" datafld= "telphone"></span> 
</p> <p> 


<input type="button" value=" 前 一 用 户 " onclick="moveprevious()" /> 


<input type="button" value=" 后 一 用 户 " onclick="movenext()" /> 
</p> </body> 
</html> 


其 中 ，XML 标记 中 的 async="false" 属 性 确保 XML 数据 在 HTML 文件 处 理 前 装 入 。 
数据 岛 是 下 5.0 以 后 加 入 的 新 特性 。 由 于 XML 数据 岛 将 数据 带 到 了 客户 方 ， 这 就 为 需 
要 在 客户 方 进行 数据 处 理 的 应 用 提供 了 很 大 的 方便 ， 同 时 使 应 用 的 效率 也 得 到 了 提高 。 


本 章 小 结 


本 章 结合 具体 应 用 介绍 了 XML 应 用 的 主要 方面 和 技术 处 理 , 主要 内 容 包括 XML 文档 
的 基本 格式 、XML 文档 的 显示 处 理 技术 、 在 服务 器 端 和 客户 端 对 XML 文件 进行 访问 和 处 


理 的 技术 以 及 对 XML 数据 岛 的 使 用 等 。 本 章 内 容 实用 性 较 强 ， 
处 理 ， 其 中 一 些 样 例 来 自作 者 在 Web 应 用 开发 中 的 经 验 总 结 。 


可 


点 在 于 XML 文档 的 访问 
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习题 
1. 选择 题 
(1) XML 文档 的 根 结 点 在 XSL 中 使 用 ( ) 来 代表 。 
六- 2 (GUL DD -9 


(2) XSL 样式 单 中 用 到 了 许多 具有 一 定 功 能 的 XSL 元 素 和 指令 ，( ) 元 素 可 以 
定义 模板 规则 ， ( ) 指令 可 以 应 用 匹配 的 模板 规则 ， ) 指令 可 以 取得 特定 的 结 
点 或 表达 的 值 。 


A. <xsl:value-of> B. <xsl:template> 
C. <xsl:apply-template> D. <xsl:sort> 

(3) XSL 中 要 匹配 任意 名 称 的 元 素 结 点 ， 应 使 用 ) 符号 。 
A 144 B. “/*” 1” Dre 


(4) XML 的 数据 存 取 机 制 包括 〈 ss 
A. 可 以 通过 DOM (Document Object Model) 读 取 XML 文档 中 的 结 点 
B. 通过 DSO (Data Source Object) 进行 XML 的 数据 绑 定 可 以 方便 地 将 XML 
结 点 同 HTML 标记 捆绑 ， 从 XML 文档 中 读 取 或 写 入 数据 
C. 样式 单 CSS 和 XSL 实际 上 可 通过 为 XML 数据 赋予 一 定 的 样式 信息 来 使 其 能 
够 在 浏览 器 中 显示 
D. XML 直接 输出 文档 
(5) 一 个 XML 文件 最 基本 的 构成 是 〈 》 
A. XML 声明 ”B. 处 理 指示 C. XML 元 素 ”D. 文件 的 内 容 
(6) 一 个 XML 文件 能 被 浏览 器 解析 的 最 小 要 求 是 〈 六 
A. 这 个 文件 是 形式 良好 的 
B. 这 个 文件 是 结构 完整 的 
C. 每 个 标记 都 必须 是 XML 标准 定义 过 的 
D. 扩展 名 必须 是 .xml 的 文件 
(7) 使 用 XSL 定义 XML 文档 的 显示 方式 的 基本 思想 是 》 
A. 通过 定义 转换 模板 ， 将 XML 源 文档 转换 为 带 样式 信息 的 可 浏览 文档 
B. 定义 不 同 于 以 往 的 显示 风格 
C. 控制 XML 文档 显示 数据 的 输出 
D. 通过 定义 显示 模板 显示 指定 的 XML 数据 
(8) 下 列 关 于 XML 接口 DOM 的 描述 ， 错 误 的 是 〈 
A. DOM 的 全 称 是 Document Object Model， 即 文档 对 象 模型 
B. 在 应 用 程序 中 , 基于 DOM 的 XML 分 析 器 将 一 个 XML 文档 转换 成 一 个 对 象 
模型 的 集合 (通常 称 DOM 树 ) 
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C. 通过 DOM 接口 ， 应 用 程序 可 以 在 任何 时 候 访问 XML 文档 中 的 任何 一 部 分 
数据 ， 因 此 ， 这 种 利用 DOM 接口 的 机 制 也 被 称 为 随机 访问 机 制 
D. DOM 强制 使 用 树 模型 来 访问 XML 文档 中 的 信息 ， 不 适合 XML 的 模式 
(9) 关于 XSL 模板 和 模板 规则 ， 下 列 说 明 错误 的 是 〈 二 
A. XSL 文档 包含 一 组 或 几 组 模板 规则 和 其 他 规则 
. 模板 规则 拥有 模式 (pattem)〉 以 及 模板 (template) 
. 每 个 模板 规则 都 是 xsl:template 元 素 
. 模式 指定 模板 规则 所 使 用 的 树 型 结构 ， 而 模板 是 用 来 在 与 此 模式 匹配 时 进行 
输出 的 
2. 编程 题 
(1) 编程 将 网 上 教学 数据 库 中 的 学 生 问 题 转化 为 XML 表示 形式 ， 利 用 XML 数据 岛 
将 数据 带 到 客户 端 ， 利 用 JavaScript 脚本 技术 读 取 学 生 问 题 进行 显示 ， 要 求 能 进行 翻 页 显示 。 
(2) 利用 ASP 加 XML 实现 一 个 简单 的 个 人 留言 短 ， 每 条 留言 的 内 容 包 括 内容 、 留 言 
时 间 ， 要 求 能 分 页 查看 留言 。 任 何人 可 输入 留言 ， 管 理 员 账 户 可 删除 留言 。 
(3) 利用 XML 数据 岛 实现 交互 做 单 选 题 的 Web 页 面 应 用 , 每 道 试题 含有 一 个 原因 解 
析 。 要 求 在 同一 页 面 中 显示 所 有 试题 ， 当 学 生 做 错时 ,提示 做 错 ， 做 对 时 弹出 消息 显示 原因 。 


一 
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10.1 什么 是 AJAX 


AJAX 是 Asynchronous JavaScript and XML (异步 JavaScript 和 XML 技术 ) 的 简称 ， 
通过 这 种 技术 ， 开 发 人 员 可 以 将 来 自 服务 器 的 信息 无 颖 地 更 新 部 分 Web 页 面 或 Web 应 用 
程序 ， 有 效 弥 补 用 B/S 方式 开发 交互 式 Web 页 面 的 不 足 。 

AJAX 技术 所 涉及 的 主要 方面 如 下 。 

口 XHTML 和 CSS: 定义 文档 的 外 观 和 显示 样式 。 

口 文档 对 象 模型 (DOM) : 访问 文 挡 内 容 。 
口 ” JavaScript 脚本 语言 编写 执行 逻辑 。 
口 XMLHttpRequest 对 象 : 实现 与 服务 器 的 交互 。 

其 中 , XHTML 是 可 扩展 标记 语言 , 它 与 HTML 的 区 别 在 于 XHTML 遵循 严格 的 XML 
规则 ， 强 调 标记 要 配套 ， 嵌 套 时 不 能 出 现 交叉 。 

XMLHttpRequest 对 象 是 AJAX 技术 的 核心 ,其 工作 原理 如 图 10-1 所 示 。XMLHttpRequest 
对 象 是 附 在 MSXML 链接 库 中 的 ， 它 提供 了 客户 端 同 HTTP 服务 器 通信 的 协议 。 客 户 端 可 
以 通过 XMLHttpRequest 对 象 向 HTTP 服务 器 发 送 请 求 并 使 用 XML 文档 对 象 模型 处 理 回 
应 。 如 今 的 绝 大 多 数 浏览 器 都 增加 了 对 XMLHttpRequest 的 支持 。 


客户 端 (浏览 器 ) 


JavaScript 


XMLHttpRequest 


HTTP 响应 


HTTP 请 求 XML 数据 


服务 端 器 〈IIS) 


图 10-1 XMLHttpRequest 工作 原理 


AJAX 利用 JavaScript 事件 实现 Web 应 用 中 对 用 户 行为 触发 的 实时 响应 和 处 理 。 
适合 使 用 AJAX 技术 的 应 用 主要 有 部 分 页 面 更 新 、 不 可 见 的 数据 检索 、 不 间断 更 新 、 
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平滑 的 界面 、 拖 放 等 。 而 AJAX 的 突出 缺点 是 可 能 会 动态 改变 HIML 标签 ， 在 一 定 程度 上 
阻 但 了 搜索 引擎 编制 索引 。 


使 用 AJAX 的 条 件 是 不 能 禁用 脚本 语言 且 需 要 高 版 本 的 浏览 器 , 如 IE4+、MozillaFirefox、 
Netscape 7+ 等 。 


10.2 ”XMLHttpRequest 对 象 的 使 用 
10.2.1 创建 XMLHttpRequest 对 象 


浏览 器 对 XMLHttpRequest 对 象 的 支持 与 浏览 器 的 类 型 和 版 本 有 关 。 创 建 XMLHttpRequest 
对 象 时 ， 必 须 先 检测 所 使 用 的 浏览 器 是 哪 种 类 型 。 
对 于 IE7 以 前 的 正 的 创建 方法 是 : 


var xHRObject = new ActiveXObject("microsoft. XMLHTTP"); 
对 于 IE7 和 其 他 浏览 器 的 创建 方法 是 : 


var xHRObject = new XMLHttpRequest( ); 


考虑 到 兼容 不 同 浏览 器 的 使 用 ，XMLHttpRequest 对 象 的 创建 代码 可 设计 如 下 : 


var xmlhttp = false; 
function creatXmlHttpRequest( ) { 


if (window.XMLHttpRequest) { UlE7 和 其 他 浏览 器 的 创建 方法 
xmlhttp = new XMLHttpRequest(); 


be if (window.ActiveXObject) { /IlE4、IE5、|1E6 的 创建 方法 
xmlhttp = new ActiveXObject("Microsoft. XMLHTTP"); 
} 
) 


【注意 】JavaScript 是 区 分 大 小 写 的 ， 代 码 中 XMLHttpRequest 的 大 小 写 要 正确 。 
10.2.2 XMLHttpRequest 对 象 的 属性 


XMLHttpRequest 对 象 具有 如 下 属性 。 
口 ”onreadystatechange: 指定 当 readyState 属性 改变 时 的 事件 处 理 函 数 。 
口 readyState: 返回 当前 请 求 的 状态 。 返 回 值 意义 如 表 10-1 所 示 。 


表 10-1 XMLHttpRequest 对 象 的 readyState 属性 的 取 值 


解 释 
已 建立 XMLHTTP 对 象 ， 但 尚未 调用 open 方法 建立 到 服务 器 的 连接 
XMLHTTP 对 象 已 加 载 ， 但 尚未 调用 send 方法 发 送 请 求 
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续 表 


取 _ 值 解释 
2 已 调用 send 方法 ， 但 服务 器 尚 无 响应 
a 已 取得 部 分 服务 响应 结果 , 但 还 不 能 使 用 该 对 象 的 属性 和 方法 ， 因 为 状 


态 和 响应 头 不 完整 
已 接收 所 有 返回 数据 


responseBody: 以 无 符号 字 节 数组 形式 返回 响应 信息 。 
responseStream: 以 ADO Stream 对 象 的 形式 返回 响应 信息 。 
responseText: 以 字符 串 形 式 返回 响应 信息 。 

responseXML: 将 响应 信息 格式 化 为 XML Document 对 象 表示 。 
status: 返回 当前 请 求 的 http 状态 码 。 

statusText: 返回 当前 请 求 的 响应 行 状态 信息 。 


回回 * 回 ;回合 鼎 


10.2.3 XMLHttpRequest 对 象 的 方法 


XMLHttpRequest 对 象 的 方法 如 表 10-2 所 示 。 


表 10-2 XMLHttpRequest 对 象 的 方法 


方法 功 能 
AbortO 取消 当前 请 求 
GetAllResponseHeader() 获取 响应 的 http 头 的 所 有 信息 
GetResponseHeader() 从 响应 信息 中 获取 指定 的 http 头 的 信息 


创建 一 个 http 请 求 , 并 指定 此 请 求 的 方法 .URL 以 及 异步 /同步 方式 。 
open(method, URL, synchronous) | 其 中 ， 第 一 个 参数 method 有 GET 和 POST 两 种 方式 ， 第 三 个 参数 
值 为 Tme 时 代表 异步 ， 值 为 False 时 代表 同步 
Send(String) 发 送 请 求 到 http 服务 器 
setRequestHeader 单独 指定 请 求 的 某 个 http 头 


XMLHttpRequest 对 象 发 送 请 求 处 理 的 顺序 通常 如 下 : 
(1) 调用 open 方法 ， 参 数 中 指定 服务 器 URL 地 址 等 信息 。 
(2) 根据 需要 设置 onreadystatechange 事件 处 理 函 数 。 
(3) 根据 需要 使 用 setRequestHeader 方法 设置 请 求 头 信息 。 
(4) 使 用 send 方法 向 服务 器 送出 请 求 。 
(5) 从 4 个 response 属性 中 选择 一 个 取得 服务 器 的 响应 结果 。 
其 中 ,第 (2) 步 和 第 (3) 步 根 据 需 要 设 定 。 以 下 就 上 述 方法 中 参数 的 选择 做 几 点 说 明 : 
(1) 关于 POST 和 GET 方法 
POST 方法 传递 的 信息 量 较 大 ， 最 多 可 达 2GB， 而 GET 方法 传递 的 信息 量 较 小 , 下 限 
制 为 2083 个 字符 ，Opera 为 4050 个 字符 ，Netscape4 为 8192 个 字符 。 
(2) 关于 查询 参数 串 的 传送 方式 
查询 参数 串 可 跟 在 URL 串 内 ， 也 可 以 通过 send 方法 的 参数 给 出 。 
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xmlhttp.open("GET", "Reponse.asp&value=1", "true"); 
xmlhttp.send(null); 


根据 需要 还 可 对 查询 参数 串 的 内 容 进行 编码 ， 以 防止 因 特 殊 字符 导致 URL 解析 错误 。 


var argument = "value="+encodeURIComponent(data); 
xmlhttp.open("POST", "Reponse.asp", "true”"); 
xmlhttp.setRequestHeader("Content-Type", 

"application/x-www-form-urlencoded ); 
xmlhttp.send(argument); 


其 中 ，encodeURIComponentO 是 JavaScript 的 一 个 全 局 函数 ， 可 把 字符 串 作为 URI 组 

A 该 方法 不 会 对 ASCII A hal 也 不 会 对 诸如 -、_、.、!、~、*、 
、( ) 等 ASCII 标点 符号 进行 编码 ， 其 他 字符 (例如 ，;、/、?、:、@、&、=、+、$、,、# 

等 是 用 于 分 隔 URI 组件 的 符号 ) 将 由 十 六 进 制 的 转 义 序列 符 让 换 。 

另 一 个 函数 decodeURIComponent() 将 对 encodeURIComponentO 函 数 编码 的 URI 进行 
解码 。 

(3) 关于 同步 和 异步 使 用 方式 

open 方法 中 的 第 三 个 参数 用 于 表示 同步 或 异步 方式 。 在 prototype 等 js 类 库 中 一 般 默 
认为 异步 方式 ， 即 设 为 True。 

同步 情况 时 ，js 会 等 待 请 求 返回 ， 并 获取 状态 信息 ， 不 需要 onreadystatechange 事件 处 
理 函 数 。 以 下 为 常见 编程 处 理 形 式 : 


function search( ){ 
var URL=" Reponse.asp"; 
xmlhttp.open("GET",URL, false); 
xmlhttp.send(null); 
var result = xmlhttp.status; 
if(result==200) { ”// 表 示 OK ,正常 
alert(xmlhttp.responseText); 
异步 情况 使 用 XMLHttpRequest 对 象 ， 须 用 onreadystatechange 属性 指定 事件 触发 要 执 
行 的 函数 。 在 事件 处 理 函 数 中 ， 将 检查 readyState 属性 ， 看 数据 是 否 准备 就 绪 ， 如 果 已 经 
准备 就 结 ， 则 可 读 取 响 应 数据 。 

以 下 代码 在 页 面 加 载 时 通过 XMLHttpRequest 对 象 的 open 方法 装载 student.xml 文件 ， 
通过 XMLHttpRequest 对 象 的 onreadystatechange 属性 定义 事件 处 理 回 调 函 数 。 在 回调 函 
数 中 ， 第 一 个 要 执行 的 任务 是 检查 数据 是 否 已 下 载 完毕 ， 通 过 检查 XMLHttpRequest 对 象 
的 readyState 属性 是 否 等 于 4 (代表 已 完成 下 载 ) 来 实现 。 确 定数 据 已 下 载 完毕 后 ， 可 以 用 
XMLHttpRequest 对 象 的 responseText 或 responseXML 属性 来 取 回 数据 。 


<SCRIPT LANGUAGE = "JavaScript"> 
var XmlHttp = new ActiveXObject("Microsoft. XMLHTTP"); 
function init () { 

XmlHttp.onreadystatechange = doChange:; 
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XmlHttp.open("GET", "student.xml", true); 
XmlHttp.send(); 
) 
function doChange() { 
if (XmlHttp.readyState == 4) { 
alert("XML 文件 装载 完毕 "); 
alert(XmlHttp.responseText); 


} 
} 
</script> 
<body onload= "init()">...... </body> 


10.2.4 在 Web 服务 器 端 使 用 XMLHttpRequest 对 象 


在 Web 服务 器 端 也 可 以 使 用 XMLHttpRequest 对 象 访问 Intemet 上 的 信息 资源 。 利 用 
Internet 网 上 搜索 引擎 提供 的 访问 接口 ， 通 过 发 送 URL 请 求 ， 并 对 返回 的 搜索 结果 进行 过 
滤 处 理 ， 就 可 以 实现 个 性 化 的 搜索 服务 。 以 下 是 利用 百度 搜索 服务 的 ASP 程序 代码 : 

<% 

Set objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP") 
url="http://www.baidu.com/s?wd="&request("keyword")& 

"&pn="&request("start") “参数 wd 为 关键 词 ，pn 为 页 码 
objXMLHTTP.open "GET",url, False 


objXMLHTTP.send(null) 
content = objXMLHTTP.responseText 


【注意 】 有 些 搜 索引 擎 提供 的 访问 接口 进行 了 限制 ， 如 Google 搜索 服务 ， 从 服务 器 上 
发 送 XMLHTTP 请 求 , 则 只 有 在 Google 注册 了 密 钥 的 站 点 才能 访问 , 并 在 访问 时 通过 URL 
参数 key 传递 密 钥 ， 但 当 站 点 为 localhost 时 不 受 限制 。 


10.3 ” AJAX 应 用 举例 


10.3.1 样 例 1 一 一 网 络 考试 中 避免 并 发 交卷 的 处 理 


在 网 络 考试 的 交卷 处 理 、 文 件 上 传 等 应 用 中 ， 涉 及 的 处 理 任 务 要 花费 较 多 的 时 间 ， 为 
了 避免 服务 器 处 理 负担 过 重 而 出 现 问题 ， 可 限制 3 秒 内 不 同时 处 理 两 个 用 户 的 交卷 请 求 。 
此 时 可 利用 AJAX 技术 发 送 请 求 到 服务 器 检查 是 否 存在 较 短 时 间 的 “并 发 ”访问 ， 如 果 存 
在 ， 则 提示 用 户 暂 缓 交卷 。 具 体操 作 步 骤 如 下 。 

首先 在 表单 提交 时 通过 onsubmit 属性 设置 事件 执行 函数 ， 该 函数 将 通过 AJAX 技术 发 
送 请 求 到 服务 器 检查 是 否 存在 “并 发 ”， 只 有 当 服 务 器 返回 的 结果 为 ok 时 才能 正常 交卷 。 
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<form method="post" onsubmit= "return check()" action="finish.asp"> 
程序 1: 表单 提交 的 执行 检查 函数 checkO 


function check (){ 
xmlhttp.Open("get", "check_exam.asp", false); 
xmlhttp.send(null); 
res=xmlhttp.responseText; 
if (res=="ok") 
return true; 
else{ 
alert(" 服 务 器 忙 ， 请 稍 后 交卷 站 ); 
return false; 
} 


【说 明 】 本 例 在 open 方法 中 设置 为 同步 访问 方式 ， 也 就 是 客户 端 脚本 在 发 送 请 求 后 将 
等 待 服务 器 的 响应 ， 并 通过 XMLHttpRequest 对 象 的 responseText 获取 响应 信息 。 

旦 序 2: 实现 并 发 检查 的 ASP 程序 

服务 器 实现 并 发 检查 的 一 个 方法 是 用 Application 对 象 记 下 前 一 个 用 户 的 访问 时 刻 (用 
相对 秒 值 表示 ), 若 当 前 用 户 的 访问 时 刻 与 前 一 个 用 户 的 访问 时 刻 差 在 3 秒 内 , 则 禁止 访问 。 


>--------------------- Check_exam.asp 一 -一 一 -一 一 一 一 -一 
<% 
response.expires=0 
k=now 
my=minute(k)*60+second(k) "计算 本 用 户 的 访问 时 刻 
if application("examone")<>"" then 
if abs(my-application("examone"))<=3 then 
response.write "not allow" "返回 不 允许 访问 
response.end 
else 
application.lock 
application("examone")=my “记录 当前 用 户 的 访问 时 刻 
application.unlock 
end if 
else 
application.lock 
application("examone")=my "记录 第 一 个 用 户 的 访问 时 刻 


application.unlock 


endif 
response.write "ok" ' 返 回 允 许 访问 
%> 


【说 明 】 对 于 涉及 任务 处 理 比 较 重 的 应 用 (如 复杂 报表 的 生成 ) ， 可 考虑 用 此 方法 限 
制 并 发 访问 用 户 数 ， 否 则 服务 器 的 处 理 程序 可 能 会 因为 进程 负担 过 重 而 出 现 响 应 上 的 问题 
或 故障 。 
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10.3.2” 样 例 2 一 一 作品 的 投票 处 理 


网 络 作品 〈 如 文章 、 网 页 等 ) 的 发 布 与 评价 是 目前 网 络 站 点 的 一 个 常用 功能 ， 它 为 用 
户 之 间 的 协作 交流 提供 了 一 个 很 好 的 空间 。 在 网 络 教学 系统 中 ， 人 允许 学 生 上 传 作品 ， 并 将 
自己 的 作品 发 布 出 来 ， 用 户 在 浏览 作品 的 同时 ， 可 以 给 作品 投票 ， 从 而 实现 学 习 、 交 流 和 
评价 的 有 效 结合 。 本 例 利用 XML 实现 信息 存储 ， 利 用 ASP 技术 实现 数据 访问 处 理 ， 利 
AJAX 技术 实现 页 面 动态 处 理 。 用 户 给 作品 投票 后 ， 可 以 在 不 刷新 页 面 的 情况 下 实现 投票 
结果 的 自动 更 新 显示 ， 能 够 产生 较 好 的 视觉 效果 ， 应 用 效率 也 较 高 。 
(1) 存储 评价 信息 的 XML 文件 
以 下 为 存储 用 户 对 发 表 的 网 页 作品 进行 投票 的 XML 文件 格式 , 其 中 , userpage 结 点 的 
url 为 被 评 网 址 ，name 为 用 户 对 作品 的 命名 ，usermame 为 作品 设计 者 的 用 户 标识 ;toupou 
子 结 点 记录 各 用 户 对 网 站 的 投票 ，byuser 为 投票 者 ，amount 为 投票 星 级 。 
>------------------------- homepage.xml -一 -一 -一 -一 -一 -一 
<?xml version="1.0" encoding="gb2312"?> 
<allpages> 
<userpage url="page_1.htm" name=" 我 的 个 人 网 页 " username="jsj04115"> 
<toupou byuser="ding" amount="2"/> 
<toupou byuser="jsj04118" amount="4"/> 


</allpages> 
(2) 应 用 界面 设计 
应 用 界面 由 ASP 脚本 访问 XML 文件 和 数据 库 动态 产生 ， 用 户 自己 发 布 的 作品 还 提供 
有 删除 超 链接 ， 如 图 10-2 所 示 。 


RL i 
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图 10-2 网 页 作品 投票 界面 


“224 。 Web 编程 实践 教程 


界面 的 关键 设计 是 投票 下 拉 列 表 框 和 评价 等 级 的 显示 处 理 。 在 下 拉 列 表 框 的 生成 处 理 
中 定义 了 onchange 事件 执行 处 理 程序 vote0， 该 函数 设计 有 3 个 参数 ， 分 别 为 网 站 URL、 
下 拉 列 表 框 对 象 及 作品 序号 。 其 中 ， 作 品 序号 是 为 了 更 新 页 面 的 评价 等 级 ， 各 作品 的 投票 
评价 等 级 对 应 的 显示 区 域 的 标识 名 按照 序号 分 别 为 votel、vote2…， 可 通过 一 个 循环 实现 
此 设置 。 以 下 为 生成 下 拉 列 表 框 和 投票 结果 显示 的 代码 段 ， 其 中 ，num 为 被 评价 作品 对 应 
的 序号 。 在 生成 界面 时 还 要 考虑 在 评价 等 级 栏 中 显示 作品 的 已 有 投票 结果 ， 对 于 已 投票 的 
作品 在 投票 列表 框 中 显示 该 用 户 的 投票 值 作为 列表 框 的 默认 选中 项 。 


<% 

set userpage=xmldoc.documentElement.selectNodes("//userpage") 
num=0 

for xh= userpage.length-1 to 0 step -1 "循环 处 理 所 有 发 布 的 作品 
num=num+1 作品 排列 序号 

set node = userpage.item(xh) ' 访 问 某 个 作品 的 结 点 

m = node.getAttribute("username") "发 布 者 标识 

url = node.getAttribute("url") "发 布 的 网 页 地 址 


全 // 其 他 显示 部 分 略 
<td width="118” align=center><p align=center><select size="1” name="D<%=num%>" 
onchange="vote(<%=url%> ,this,<%=num9%>) > 
<option value="0"> </option> 
<option value="5" <%if piao=5 then%> selected<%end if%>>*****</option> 
<option value="4" <%if piao=4 then%> selected<%end if%>>****</option> 
<option value="3" <%if piao=3 then%> selected<%end if%>>***</option> 
<option value="2" <%if piao=2 then%> selected<%end if%>>**</option> 
<option value="1" <%if piao=1 then%> selected<%end if%>>*</option> 
</select></p> 
</td> 
<% set votes = node.selectNodes("toupou") 
本 计算 投票 综合 等 级 xin 的 代码 略 ， 同 后 面 的 投票 记录 程序 .…… 


<td width="118" align=center><span id="vote<%=num%>"><%=xin%></span></td> 


(3) 投票 事件 的 引发 与 处 理 
当 用 户 通过 下 拉 列 表 框 进行 投票 时 将 触发 onchange 事件 ， 从 而 导致 执行 vote 函数 。 该 
函数 的 功能 是 根据 用 户 的 投票 选择 提交 信息 给 服务 器 的 ASP 程序 进行 记录 处 理 。 这 里 ， 利 
用 XMLHTTP 对 象 提交 URL 访问 请 求 , 并 利用 该 对 象 的 responseText 属性 获取 服务 器 的 响 
应 信息 ， 借 助 DHTML 将 响应 信息 在 相应 页 面 位 置 进行 更 新 。 
<SCRIPT LANGUAGE = "JavaScript"> 
var xmlhttp= new ActiveXObject("Microsoft.XMLHTTP"); 
function vote(url, obj,n) { 
myurl="updatevote.asp?url="+url+"&choice="+obj.value; 
// 将 投票 选项 传递 给 处 理 程序 ， 传 递 url 参数 是 为 了 在 处 理 程序 中 查找 被 投票 对 象 
xmlhttp.Open("POST", myurl, false); 
xmlhttp.send(null); // 发 送 请 求 
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x= xmlhttp.responseText:; 1/ 获取 服务 器 的 响应 
if (x!="fail") 
document.getElementByld("vote"+n).innerHTML=x; // 更 新 页 面 评 价 等 级 
else 
alert(" 每 个 网 页 只 能 投 一 次 票 "); 
} 
</script> 


【说 明 】 本 例 用 getElementById("vote"+n) 查 找 页 面 上 显示 投票 的 标记 ， 方 法 参数 n 根 
据 实际 选择 动态 变化 ， 这 是 实现 动态 显示 处 理 的 一 个 技巧 。 

(4) 投票 记录 程序 

投票 记录 程序 的 功能 是 检查 用 户 的 投票 是 否 有 效 ， 对 任意 一 个 网 站 的 投票 ， 一 个 用 户 
只 能 有 一 次 表决 权 。 如 果 投 票 有 效 ， 则 记录 该 票 的 信息 ， 并 计算 相应 网 站 的 投票 综合 表决 
结果 返回 客户 浏览 器 ;如 果 投 票 无 效 ， 则 返回 fail 消息 。 

以 下 为 投票 处 理 程序 ， 值 得 一 提 的 是 ， 程 序 中 用 到 的 Cookie 变量 usemame 是 用 户 登 
录 后 记录 的 用 户 身份 标识 。 


-- Updatevote .asp -一 -一 -一 -一 -一 
<% set xmldoc = Server.CreateObject("Microsoft. XMLDOM") 

xmldoc.async = false 

xmldoc.load(Server.MapPath("homepage.xml")) 

set p=xmldoc.selectSingleNode("W/userpage[@url="+request("url ")+"] ) 

' 根 据 url 参数 查找 被 评 结 点 ， 每 个 作品 的 URL 是 唯一 的 

set myvote=p.selectSingleNode("toupou[@byuser=""+request.cookies("username")+"]") 
查找 是 否 有 当前 用 户 的 投票 


if not (myvote is nothing) then 


response.write "fail" "已 投 过 票 ， 不 能 再 投 
response.end 
end if 
set my=xmldoc.createElement("toupou") "创建 一 个 新 的 投票 结 点 
my.setAttribute "byuser" , Request.cookies("username") "投票 用 户 标识 
my.setAttribute "amount" , request("choice") 
p.appendChild(my) "作品 加 入 新 的 投票 结 点 
xmldoc.save(Server.MapPath("homepage.xml")) "保存 修改 后 的 XML 文件 
"以 下 计算 投票 等 级 


set votes=p.selectNodes("toupou ) 
k=votes.length 
xing="™" 
x=0 
if k<>0 then 
for each vote in votes 
x=x+cint(vote.getAttribute("amount")) 


next 
x=(int)(x/k) "计算 平均 等 级 分 
for i=1 to x 
xin=xin&"™*" ' 将 等 级 分 转化 为 星 级 串 
next 


endif 
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response.write xin "将 投票 等 级 返回 浏览 器 
%> 


10.3.3” 样 例 3 一 一 页 面 元 素 间 的 关联 处 理 


Web 页 面 中 多 元 素 的 关联 查询 在 应 用 设计 中 比较 常见 。 例 如 ， 在 学 生 作业 解答 的 查询 
页 面 中 ， 用 户 选择 了 某 个 班 ， 则 学 生 选 项 应 是 该 班 的 学 生 。 以 往 的 处 理 办 法 是 根据 用 户 选 
择 的 班级 ， 通 过 事件 处 理 机 制 ， 导 致 表单 提交 ， 从 而 根据 所 选 班级 查询 数据 库 表格 将 相关 
学 生 显示 在 新 的 页 面 中 。 这 样 的 显示 处 理 缺 点 主要 有 3 点 : 一 是 页 面 重新 生成 ， 因 页 面 的 
刷新 导致 页 面 显 示 的 闪烁 感 ; 二 是 处 理 效率 低 ， 重 新 生成 页 面 要 重 写 页 面 上 所 有 区 域 的 内 
容 ; 三 是 编程 比较 烦琐 ， 随 着 页 面 数据 相 关 性 的 增加 ， 需 要 传递 和 判断 的 信息 量 会 逐渐 增 
加 ， 给 编程 带 来 的 困难 也 随 之 增加 。 本 例 采 用 AJAX 技术 实现 页 面 元 素 间 的 关联 处 理 ， 只 
需要 根据 页 面 某 个 元 素 的 变化 对 其 关联 的 元 素 进行 改变 即 可 ， 而 不 用 改变 页 面 上 的 其 他 内 
容 ， 从 而 实现 在 页 面 不 刷新 的 情况 下 实现 数据 关联 的 处 理 ， 如 图 10-3 所 示 。 


怠 教 师 换 作 锅 分 - Wicrosoft Internet Erplorer 
| 文件) 编辑 (E) 查看 WD 收 共 W) 工具 CU) 帮助 0D | 记 
地 引 0) | 色 ] http://1 oerlhost/ cometoke. asp7ke=E5Tel9ca5EB10558259u2bfc59Td963e ESE 
二 课件 订 响 了 修改 寥 码 a 教学 日 记 亏 ] 个 人 文档 名 如 退出 课程 加 re 程序 设计 
Ozr 名 某 生 作业 某 作 dk 的 按 内 容 查 作业 作业 成 于 
学 练 园地 ; 
= 了 gf [电子 两 务 2007-1 了 ?4t5: [古文 司 [ES 
多 学 内 容 基 理 得 子 商务 05-1 | 
印 试 思 库 管理 电子 商务 2007- 1 
喇 当 斌 于 管理 06-1 
计算 机 06-2 
站 入 抽 守 分 析 电子 政务 2009 研 究 生 班 
班 好 与 用 户 逢 理 : 
过 作业 与 实验 管理 
中 作业 布置 与 修改 


由 作业 批改 与 查看 

四 实验 布置 与 修改 

由 实验 批改 与 查看 
< 计 论 与 答 帮 各 理 
区 4WR 昔 理 
证 个 人 省 理 
inl 


图 10-3 ”班级 与 姓名 的 关联 显示 处 理 

在 页 面 中 对 应 “班级 ”和 “学 生 姓名 ”的 选择 框 分 别 命名 为 classid 和 studentid, 在 “ 班 
级 ”对 应 的 下 拉 列 表 框 定义 事件 函数 onChange="check0"，check 函数 的 作用 是 根据 用 户 选 
择 的 学 院 通过 XMLHTTP 对 象 访问 服务 器 上 的 ASP 程序 ， 并 通过 读 取 ASP 程序 的 响应 信 
息 更 新 “学 生 姓 名 ”列表 框 的 显示 内 容 。 

1. 页 面 元 素 关联 设计 

在 本 应 用 示例 中 ， 要 讨论 的 两 个 关联 元 素 为 两 个 下 拉 列 表 框 ， 这 两 个 下 拉 列 表 框 分 别 
用 来 选择 班级 和 学 生 。 为 了 实现 两 个 关联 元 素 间 的 连锁 响应 ， 可 在 代表 班级 的 下 拉 列 表 框 
中 定义 onchange 事件 处 理 函 数 (check) 。 
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<td width="70" align="right"> 班 级 : </td> 
<td height="30"> 
<select name="classid" size=1 onChange="check( )"> 
<option value= "" >-- 请 选择 所 在 班级 --</option> 
<% 
sql="select* from classtable ” “' 查 班级 表 
set rs=conn.execute(sql) 
do while not rs.eof ' 用 循环 列 出 所 有 班级 
%> 
<option value="<%=rs("classid")%>"><%=rs("classname")%></option> 
<%rs.movenext 
loop 
rs.close 
%> 
</select></td> 
<tr bgcolor=#e3f1d1> 
<td width="110" align="right"> 学 生 姓名 : ”</td><td height="30"> 
<select name="student" size="1"> 
</select> 


2. 事件 处 理 代码 

在 事件 处 理 函 数 check 中 ， 通 过 AJAX 技术 访问 服务 器 端的 ASP 程序 ， 并 将 选择 的 班 
级 作为 参数 传递 给 该 ASP 程序 。 接 下 来 读 取 ASP 程序 返回 的 该 班级 所 有 学 生 的 信息 ， 返 
回 的 信息 中 各 学 生 之 间 用 逗号 隔 开 ， 程序 中 用 字符 串 对 象 的 split 方法 将 各 学 生 分 离 出 来 存 
储 到 一 个 数组 中 。 然 后 循环 处 理 数组 元 素 ， 用 DHTML 技术 更 新 页 面 上 的 学 生 选 项 。 


<script language="JavaScript"> 
var xmlhttp= new ActiveXObject("Microsoft. XMLHTTP"); 
function check () { 
myurl="find_people.asp?classid="+classid.value; 
xmlhttp.Open("POST", myurl, false); 
xmlhttp.send(null); 
res = xmlhttp.responseText; // 获 取 ASP 程序 的 响应 
x1 = res.split(","); /| 分离 出 班级 学 生 
student.options.length=x1.length; 
for (i =0;i<x1.length-1;i++) { 
m = x1[i].split(™:"); 
student.options(i).text = m[1]; // 更 新 页 面 上 学 生 下 拉 列 表 框 的 选项 
student.options(i).value = m[0]; 
} 
} 


</script> 


【说 明 】 下 拉 列 表 框 中 的 每 个 选项 均 有 文本 内 容 〈text) 和 数据 值 (value) 两 个 属性 ， 
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每 个 学 生 的 数据 信息 对 应 这 两 部 分 的 分 别 为 姓名 和 登录 标识 ， 两 者 之 间 用 冒号 分 隔 。 
3. 根据 班级 访问 数据 库 获 取 学 生 的 ASP 程序 


该 ASP 程序 将 从 数据 库 表 格 中 查询 所 选择 班级 的 学 生 , 将 各 个 学 生 按 喜 号 分 隔 的 文本 
串 形 式 返回 给 请 求 者 ， 学 生 的 用 户 标 识 〈userid) 和 姓名 (usermame) 之 间 用 冒号 分 隔 。 其 
中 ， 包 含 文件 conn.asp 用 于 建立 与 数据 库 的 连接 。 


---- find_people.asp - i -一 
<I--#include file="conn.asp"--> 
<% response.ContentType= "text/plain" 
response.CharSet = "gb2312" 
sql= "select* from usertable where classid="&request("classid")&"™ 
set rs = conn.execute(sql) "通过 连接 对 象 执行 SQL 查询 得 到 结果 集 
do while not rs.eof 
response.write rs("user_id")&":"&rs("username")&",” 


"输出 的 学 生 之 间 用 逗号 隔 开 


rs.movenext 
loop 
%> 


10.4 在 AJAX 中 使 用 JSON 


向 服务 器 发 出 AJAX 请 求 时 ， 可 以 以 两 种 不 同 的 方式 从 服务 器 响应 中 检索 数据 ， 一 种 
是 responseXML， 另 一 种 是 responseText。 前 者 以 XML 格式 检索 数据 ， 后 者 以 纯 文 本 格式 
解析 数据 。 在 数据 传输 表示 上 目前 流行 JSON ( 即 JavaScript 对 象 表示 法 ) ， 它 是 一 种 轻 量 
级 的 数据 交换 格式 ， 易 于 用 户 阅 读 和 编写 ， 同 时 也 易于 机 器 解析 和 生成 。 

JSON 采用 完全 独立 于 语言 的 文本 格式 ， 它 是 基于 JavaScript 的 一 个 子 集 。 


10.4.1 JSON 的 具体 形式 


JSON 的 类 型 表示 形式 如 下 。 

口 数值 型 (Number) : 包括 整数 和 实数 。 

口 字符 串 (String) : 是 由 双 引 号 括 起 来 的 任意 数量 Unicode 字符 的 集合 ， 它 使 用 反 
斜 杠 表示 转 义 字符 。 

口 null: 代表 “ 空 引用 ”。 

布尔 型 (Boolean) : 只 有 True 和 False 两 个 值 。 

数组 (Array) : 是 值 (value) 的 有 序 集合 ， 它 以 “[” 开 始 ， 以 “]” 结 束 ， 值 之 

间 使 用 “,” 分 隔 。 

口 ”对象 (Object) : 是 一 个 无 序 的 “ 键 / 值 ”映射 的 集合 ， 它 以 “{” 开 始 ， 以 “}” 
结束 。 每 个 “名 称 ” 后 跟 一 个 “:”， 集 合 元 素 之 间 使 用 “,” 分 隔 。 其 中 的 值 可 以 


DO 
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是 双 引 号 括 起 来 的 字符 串 〈String) 、 数 值 (number) 、True、False、null、 数 组 
或 对 象 ， 结 构 可 以 嵌 套 。 
以 下 为 JSON 对 象 的 格式 : 


<script type="text/javascript"> 
var user ={ 
"name"."John", 
"age":23， 
"email john@163.com” 


alert(user.name); // 也 可 写成 user["name"]; 
</script> 


此 时 需 注意 JSON 格式 与 对 象 字面 量 的 区 别 , JSON 的 名 字 部 分 严格 用 双 引 号 将 名 字 括 
起 来 ， 而 对 象 字面 量 的 名 字 部 分 则 不 加 引号 。 
以 下 增加 Address 属性 ， 并 定义 成 数组 ， 用 于 表示 用 户 有 多 个 地 址 。 


<script type="text/javascript"> 
var user ={ 
”namer"Mary"， 
"age":23, 
"address": 
[ 
{"city":"Beijing","zipCode":"111111"}, 
{"city":"NanChang","zipCode":"222222"} 
]， 
"email":"Mary@163.com" 
} 
alert(user.name); 
alert(user.address[0].city); /也 可 写成 user.address[O]["city"] 
alert(user.address[1].zipCode); 
alert(user.email); 
</script> 


10.4.2 JSON 数据 格式 解析 


JSON 是 基于 纯 文 本 的 数据 格式 ， 并 且 使 用 Unicode 编码 ， 这 点 与 XML 一 致 。 不 同 的 
是 ，XML 比较 适合 于 标记 文档 ， 而 JSON 却 更 适合 于 实现 数据 交换 处 理 。 

1. 在 客户 端 实现 JSON 数据 转换 

相 比 XML 需要 从 DOM 中 读 取 各 种 结 点 而 言 ，JSON 的 使 用 非常 容易 。 由 于 JSON 是 
JavaScript 的 子 集 , 可 直接 调用 JavaScript 的 eval 函数 将 服务 器 返回 的 JSON 文本 转化 为 对 
象形 式 。 

转化 时 需要 在 JSON 字符 串 的 外 面 加 上 一 个 圆 括号 : 
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var jsonObject = eval("(" + jsonFormat + ")"); 


加 上 圆 括号 的 目的 是 迫使 eval 函数 在 处 理 时 强制 将 括号 内 的 表达 式 转化 为 对 象 ， 而 不 
是 作为 语句 来 执行 。 
现代 浏览 器 ， 如 Firefox 3.5 和 下 8， 它 们 对 JSON 提供 有 特殊 的 支持 处 理 方法 ， 比 使 
eval 函数 更 有 效 、 更 安全 。 
JSON 官方 网 站 上 提供 有 开源 的 JSON 解析 器 和 字符 串 转换 器 (jsonjs) ， 包 含有 如 下 
函数 可 以 生成 JSON 文本 。 
口 string.parseJSONO: 将 文本 数据 解析 成 JSON 数据 。 
口 “objecttoJSONString0: 将 JSON 数据 转换 为 文本 串 。 该 函数 的 使 用 对 象 也 可 以 是 
其 他 类 型 ， 包 括 string、boolean、date、number、array 等 。 
如 果 要 将 JSON 数据 发 送 到 服务 器 端 ， 则 可 用 如 下 形式 转换 处 理 : 
var url = "getlnfo.asp?people=" + escape(people.toJSONString()); 


xmlHttp.open("GET", url, true); 
xmlHttp.send(null); 


有 许多 AJAX 框架 包含 了 处 理 JSON 数据 的 能 力 , 如 prototypejs( 一 个 流行 的 JavaScript 
库 、http://prototypejs.org) 提供 了 evalJSONO 方 法 ， 能 直接 将 服务 器 返回 的 JSON 文本 变 成 
JavaScript 变量 。 以 下 为 示例 代码 : 


new Ajax.Request("http://url", { 
method: "get ， 
onSuccess: function(transport) { 
var json = transport.responseText.evalJSON(); 
alert(json.xxx); 
六 


2. 在 服务 器 端 实现 JSON 数据 转换 

在 服务 器 端 中 ， 有 的 脚本 语言 提供 有 专门 的 JSON 数据 与 字符 串 的 转换 函数 。 例 如 ， 
在 PHP 中 可 以 使 用 json_decode0 将 一 串 规范 字符 串 解析 为 JSON 对 象 ， 使 用 json_encode() 
将 JSON 对 象 生成 一 串 规范 字符 串 。 以 下 为 示例 代码 : 

<?php 

$s = '{"Webname":" 学 练 园地 ","url":"cai.ecjtu.jx.cn"}'; 

S$web = json_decode($s); 


echo ' 网 站 名 称 :'.$web->webname.'<br /> 网 址 :".$web->url.; 
i 


【说 明 】 以 上 代码 中 ， 首 先 将 一 个 JSON 规范 的 字符 串 赋 给 变量 s， 然 后 用 json_decode0 
解析 成 JSON 对 象 ， 并 按照 JSON 对 象 方式 访问 对 象 的 数据 。 
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本 章 小 结 


本 章 结合 具体 应 用 介绍 了 AJAX 技术 的 编程 处 理 ，AJAX 的 核心 是 XMLHttpRequest 
对 象 的 使 用 ， 通 过 AJAX 可 实现 无 刷新 地 更 新 页 面 内 容 ， 从 而 达到 很 好 的 视觉 效果 。 本 章 
介绍 了 AJAX 的 工作 原理 、XMLHttpRequest 对 象 的 属性 和 方法 ,结合 实例 讲解 了 几 个 应 用 
编程 的 处 理 ， 另 外 还 简要 介绍 了 用 于 数据 传送 的 JSON 对 象 。AJAX 主要 用 于 客户 端的 脚 
本 编程 处 理 , 也 可 以 在 服务 器 端 脚本 中 使 用 XMLHttpRequest 对 象 访问 Intemet 的 信息 服务 ， 
从 而 实现 跨 服 务 器 的 应 用 集成 处 理 。 


习题 


1. 选择 题 
(1) 下 列 对 JavaScript 的 描述 ， 错 误 的 是 〈 其 志 
A. JScript 是 JavaScript 的 简称 
B. JavaScript 是 网 景 公司 开发 的 脚本 语言 ， 其 目的 是 为 了 简化 Java 的 开发 难度 
C. Firefox 和 下 存在 大 量 兼容 性 问题 的 主要 原因 在 于 对 JavaScript 的 支持 不 同 
D. AJAX 技术 一 定 要 使 用 JavaScript 技术 
(2) 下 列 关 于 AJAX 的 描述 ， 正 确 的 是 (  )。 
A. AJAX 是 一 种 新 兴 的 技术 ， 是 专门 用 来 制作 银行 网 页 的 
B. AJAX 是 一 系列 技术 的 集合 ， 主 要 用 到 的 技术 是 Java 技术 
C. AJAX 是 一 种 未 确定 的 技术 ， 主 要 用 来 进行 科学 计算 
D. AJAX 是 异步 式 JavaScript 和 XML 的 英文 缩写 
(3) 在 处 理应 答 中 ， 如 果 要 处 理 XML 文档 ， 则 需要 在 参数 表 中 放置 XMLHttpRequest 
对 象 的 (  ”) 属性 。 


A. responseText B. responseXML 
C. requestText D. requestXML 
(4) 对 于 XMLHttpRequest 对 象 的 readyState 状态 ， 当 xhrreadyState 一 1 时 表示 (。 ) 。 
A. 全 部 取 完 B. 正在 load C. 已 经 完成 
D. 未 初始 化 E. 正在 交互 
(5) 在 AJAX 的 4 种 技术 中 ， 控 制 通信 的 是 (  )。 
A. DOM B. CSS 
C. JavaScript D. XMLHttpRequest 
2. 设计 题 


(1) 本 书 第 4 章 介绍 的 在 线 讨论 区 存在 一 些 缺 点 , 例如 ， 当 用 户 在 讨论 区 中 不 用 超 链 
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接 退 出 ， 而 是 关闭 浏览 器 或 在 浏览 器 的 地 址 栏 输入 新 的 地 址 访问 另外 的 页 面 时 ， 系 统 没 有 
登记 到 该 用 户 的 离开 。 另 外 ， 刷 新 页 面 过 于 频繁 ， 既 影响 了 显示 效果 ， 也 加 重 了 网 络 的 传 
输 负担 ， 读 者 可 利用 目前 学 到 的 技术 解决 这 些 缺 点 。 

【提示 】 利 用 页 面 的 unload 事件 发 现 用 户 离 开 问 题 ， 用 setTimeout 函数 的 定时 代替 网 
页 标记 定义 的 refresh 定时 刷新 .利用 AJAX 技术 结合 服务 器 端 技术 实现 讨论 区 的 刷新 处 理 ， 
如 果 讨 论 区 没有 变化 信息 ， 则 不 用 更 新 讨论 区 页 面 。 

(2) 利用 AJAX 实现 一 个 英文 单词 的 查找 应 用 ， 当 用 户 输入 英文 单词 时 ， 即 在 页 面 上 
显示 对 应 的 中 文 解释 。 利 用 数据 库 表格 存储 单词 的 中 文 解释 。 

(3) 设计 一 个 关键 词 搜索 服务 网 页 ， 利 用 服务 器 端的 XMLHttpRequest 对 象 尝试 访问 
某 个 搜索 引擎 的 服务 接口 ， 并 将 结果 用 自己 的 方式 进行 适当 处 理 后 显示 ， 也 可 简单 地 将 返 
回 的 内 容 直 接 用 response 对 象 输出 。 


本 书 作 者 开发 的 网 络 教学 系统 是 一 个 功能 庞大 的 应 用 系统 ， 其 功能 窗 盖 了 教学 应 用 的 
各 个 环节 。 教 师 可 以 在 该 平台 的 支持 下 灵活 地 安排 教学 内 容 、 组 织 教学 活动 、 检 查 教 学 效 
果 等 ， 同 时 ， 学 生 也 可 在 教师 安排 下 进行 学 习 、 操 练 、 讨 论 、 提 问 、 测 试 、 协 作 等 。 本 章 
将 从 该 系统 中 提取 几 个 简单 是 有 代表 性 的 模块 来 进行 介绍 。 


11.1 网 上 答疑 子 系统 


网 上 答疑 子 系统 功能 比较 简单 ， 其 目的 是 让 教师 能 在 网 上 解答 学 生 提交 的 问题 。 本 例 
的 系统 将 学 生 的 问题 和 教师 解答 存储 在 数据 库 中 ， 是 Web 数据 库 应 用 的 典型 代表 。 


11.1.1 数据 库 表 格 设计 


考虑 到 学 生 问题 和 教师 解答 是 一 一 对 应 的 ， 所 以 在 系统 中 只 需要 设计 一 个 表格 即 可 。 
该 表格 的 字段 说 明 如 表 11-1 所 示 。 
表 11-1 problems 表格 设计 
字段 意 义 
id 用 于 唯一 性 标识 学 生 的 问题 
学 生 提问 的 内 容 
文本 


flag answer 是 / 否 是 否 回答 

answer 教师 解答 的 内 容 

time q 提交 日 期 /时 间 

user | ”文本 | 提交 问题 的 学 生 用 户 标识 


11.1.2 ”辅助 包含 文件 


系统 的 多 个 页 面 采用 统一 的 风格 样式 , 因此 可 建立 一 个 样式 文件 存储 在 include 子 目 录 
具体 代码 如 下 : 


也 


style.inc 一 - - 一- 
<style> 
BODY{ FONT-FAMILY: 宋体 ; FONT-SIZE: 14px; LINE-HEIGHT: 20px} 
Trtr1 BACKGROUND-COLOR: #FBFDFF } 
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Tr.tr2 { BACKGROUND-COLOR: 大 fffff } 

TD{ FONT-FAMILY: 宋体 ; FONT-SIZE: 14px;} 

input{ FONT-FAMILY: 宋体 ; FONT-SIZE: 12px;TEXT-DECORATION: none } 
Ailink {COLOR:#0000ff; TEXT-DECORATION: none} 

A:hover {COLOR: #0000ff; TEXT-DECORATION: none} 

A:visited {COLOR:#0000ff; TEXT-DECORATION: none} 

</style> 


【说 明 】tr 标记 定义 两 个 样式 是 为 了 实现 表格 相 邻 行 的 风格 交替 ， 从 而 对 行 与 行 之 间 
的 区 分 更 醒目 ， 同 时 也 增进 了 网 页 的 视觉 美感 。 


11.1.3 学生 端 的 设计 


学 生 端的 功能 有 两 个 : 一 是 能 看 到 网 上 的 提问 和 教师 的 解答 ， 二 是 自己 能 提问 。 

1. 显示 学 生 提 问 和 教师 解答 

显示 学 生 提问 和 教师 解答 内 容 的 界面 如 图 11-1 所 示 。 本 页 面 的 功能 是 显示 所 有 学 生 提 
交 的 问题 和 教师 解答 ， 其 目的 是 方便 学 生 查 看 网 上 已 有 的 问题 ， 同 时 本 程序 提供 了 分 页 显 
示 功 能 。 另 外 ， 对 于 学 生 自己 的 问题 可 通过 超 链 接 转 到 另 一 个 ASP 程序 ， 那 个 程序 的 界面 
与 此 相同 ， 只 是 提取 的 数据 有 差别 ， 在 select 语句 中 加 入 了 条 件 过 滤 。 代 码 如 下 : 


strSQL = "select * from problems where user=" 
&request.cookies("username")&" order by id desc" 


其 中 ，Cookie 变量 usermame 中 存储 的 是 用 户 标识 名 ， 在 用 户 登 录 成 功 后 ， 系 统 自动 将 
用 户 的 登录 名 作为 其 用 户 标识 名 记录 在 Cookie 变量 中 。 


3 Et Internet Explerer Te | 
| XR WE EW WEY IAD WW | 属 
本 加 [二] hp /ochost/ stodent_do sp 眉目 灌 
【我 提问 】 【查看 自己 的 问题 】 [本 页 是 第 9/71 页 ] 第 让 区 90 i4 痢 页 4 上 -页 下 页》 尾 页 bi 
序号 提问 内 容 和 解答 提问 时 间 
老师 ,try { } 蜂 有 一 个 return 语 名， 那么 紧 中 在 这 个 try 后 9finally { } 里 的 code 会 不 会 被 
1 执行， 什么 时 候补 执行 ,在 return 前 还 是 后 呢 ? 2009-12-16 


等 ;一定 会 执行 ,在 return 前 

老师 ，string 类 型 和 int 尖 型 的 优先 级 是 怎样 的 ? 

答 ;String 通 过 + 号 可 以 和 任何 数据 进行 拼接 ,包括 对 象 和 基本 类 型 
囊 达 式 : "Hello"+1+2 

的 结果 为 Hello12 是 先 拼 1 到 Hello, 再 将 2 拼接 到 Hellol 上 


从 


2009-12-16 


是 ? 
加 a Map 是 否 是 继承 自 Collection 接 口 2009-12-16 


请 问 老师 , error 和 exception 有 什么 区 别 啊 ? 
答 :Exception : 


1 可 以 是 可 该 控 制 (checked) 或 不 可 控 和 的 (unchecked) 
2 . 表示 一 个 由 程序 员 导 到 的 讲 误 
3 . 应 这 在 应 用 程序 电导 处 理 


中 2009-12-16 
Eror: 


立 [smile | |© 可 人 站 点 


图 11-1 分 页 显示 学 生 提问 和 教师 解答 内 容 的 界面 
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be 


程序 1: 分 页 显示 所 有 提问 并 提供 输入 提问 表单 


<html><head> 

<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 

<I-- #Include file="include\style.inc" --> 

</head><body> 

<% strPage = Request.queryString("page") 

Set objCnn=Server.CreateObject("ADODB.connection") 

objCnn.Open "datasource" ' 连 接 数 据 源 

strSQL = "select * from problems order by id desc" 

set rs=server.createobject("adodb.recordset") 

rs.open strSQL,objCnn,1,1 

if rs.RecordCount>0 then ' 有 学 生 问 题 时 才 显 示 以 下 内 容 

"以 下 根据 页 跳 转 请 求 ， 设 置 当前 页 

rs.PageSize =6 

intPageCount = rs.PageCount 

if Len(strPage) = 0 then strPage = "1" 

if int(strPage)<1 then strPage = "1" 

if int(strPage)>intPageCount then strPage = CStr(intPageCount) 

rs.absolutepage=cint(strpage) 

%> 

<!-- 以 下 显示 分 页 处 理 的 超 链 接 和 表单 --> 

<table border="0" cellspacing="1" width="100%"> 

<tr><td colspan=3 align=center> 

<form name="frmSearch" action="allproblem.asp" method="get" > 

<a href="problem.asp"><font color=red> 多 >></font> 自 己 的 问题 </a> &nbsp;&nbsp; 

[本 页 是 第 <%=int(strPage)%>/<%=intPageCount%> 页 ] 

<% ifint(strPage)>1 then 

if int(strPage)<>1 then%> [<a href="allproblem.asp?page=1"> 第 一 页 </a>] 
<% end if %> 

[<a href="allproblem.asp?page=<%=CStr( int(strPage)-1 )%>"> 前 一 页 </a>] 

<% end if 

if int(strPage)<intPageCount then %> 

[<a href="allproblem.asp?page=<%=CStr( int(strPage)+1 )%>"> 下 一 页 </a>] 

<%end if 

if int(strPage)<intPageCount then %> 

[<a href="allproblem.asp?page=<%=intPageCount%>"> 最 后 页 </a>] 

<%end if %> 

&nbsp;&nbsp; 转 向 第 <input type=text class=input id="page" name="page" style="width:20px' 

maxlength=3 value="<%=strPage%>"> 页 

<input type='image' src="images/go.gif" ></form> 

</td></tr></table> 

<table border="0" cellspacing="1" width="100%"> 

<tr class="tr3"><td width="70" align=center> 序 号 </td> 

<td width="" align=center> 提 问 标 题 </td> 

<td width="150" align="center"> 提 问 时 间 </td> </tr> 

<!-- 以 下 显示 本 页 的 问题 --> 
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<% dim flagcolor,classtype 
flagcolor = true 
for num = 1 To rs.PageSize 

if rs.EOF then 

exit for 

end if 
flagcolor = not (flagcolor) “交替 切换 表格 当前 行 采 用 的 显示 样式 
if (flagcolor) then 

classtype = "tr1" 
else 

classtype = "tr2” 
end if %> 
<tr class="<%=classtype%>"> 
<td align=center><b><font color=red><%=num%></font></b></td> 
<td><pre><%= rs("title")%></pre> 
<% if(rs("flag_answer")) then 

Response.Write "<pre><font color=#993399><b> 答 : </b></font>"&rs("answer")&"</pre>" 
else 

Response.Write "<font color=#993399><b> 未 回答 </b></font>" 
endif %> </td> 
<td align="center"><%=Formatdatetime(rs("time_qgry"),1)%> </td> </tr> 
<% rs.MoveNext 
Next %> 
</table> 
<%end if%> 
< 上 -以 下 为 输入 问题 的 表单 --> 
<p align=center> 
<form method="POST" action="insertproblem.asp"> 
<font color=green><b> 您 的 问题 是 : </b></font> 
<br><textarea rows="8" name="title" cols="80" wrap=hard></textarea> 
<br><br> 
<input type="submit" value=" 提 交 问 题 " name="B1"> 
<input type="reset" value=" 重 新 填写 " name="B2"> 
</form></p> 
</body> 
</html> 


【说 明 】 编 程 时 要 注意 边界 条 件 的 处 理 ， 例 如 ， 当 没有 一 个 学 生 问 题 时 ， 不 显示 任何 
内 容 ， 但 输入 问题 的 表单 始终 要 提供 。 此 时 读者 应 注意 琢磨 程序 中 是 如 何 实现 表格 行 的 背 
色 交 替 更 换 的。 图 中 翻 页 的 超 链 接 使 用 了 图 片 ， 比 使 用 文字 更 直观 。 

2. 提交 新 问题 

学 生 可 以 通过 以 上 查看 问题 页 面 最 底部 提供 的 “问题 输入 表单 ”填写 并 提交 自己 的 问 
题 ， 操 作 界 面 如 图 11-2 所 示 。 
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当 章 节 菜单 导航 学 习 方 式 - icrese: ft Intermet Erplorer 六 ” =olxl 

| EE 

| 现 丰 名 E]http //1ocahost/student_do sp ESE 
a,start(); 


下 
请 问 老师 , 运行 这 个 程序 时 ， 为 什么 最 后 铺 出 是 “TestB” 而 不 是 “TestA”" 呢 ? 
答 本 来 就 是 B 类 的 对 象 ， 所 以 调用 的 是 8 的 方法 。 
发 类 中 存放 的 是 B 的 引用 。 
您 的 问题 是 


所 这 问题 | 重新 汗 写 1 
el TT 厂矿 5 
图 11-2 学 生 输 入 提问 的 界面 


以 下 程序 将 学 生 输 入 的 问题 写 入 到 数据 库 表 格 中 。 
旦 序 2: 将 提问 写 入 数据 库 


一 insertproblem.asp -一 -一 一 -一 
<% 

strTitle = Trim(Request.Form("title")) 

if strTitle<>"" then 

strTitle = replace(strTitle,”™™,”™") 

strTitle = server.HTMLEncode(strTitle) 

set conn = server.CreateObject("adodb.connection ) 

conn.Open "datasource” 

strSQL = "insert into problems(title,user) values (" &strTitle & ","&request.cookies("username")&")" 
conn.Execute(strSQL) 

end if 

Server.transfer "allproblem.asp" 

%> 


【说 明 】 
(1) 在 将 问题 内 容 写 入 数据 库 表 前 用 replace 和 server.HTMLEncode 进行 了 处 理 ， 从 


而 保证 学 生 输入 的 任意 内 容 均 能 正确 显示 。 前 者 将 单 引号 换 成 中 文 单 引号 ， 是 避免 因为 单 
引号 的 存在 而 影响 SQL 语句 的 格式 ， 后 者 是 保证 输入 内 容 中 即使 含有 HTML 标记 也 不 会 
影响 正常 显示 。 


(2) 加 入 迁 条 件 判断 是 为 了 防止 学 生 将 没有 内 容 的 问题 提交 到 数据 库 中 。 
(3) 在 写 入 完毕 后 用 Server.transfer 转向 自己 的 问题 显示 页 面 (problem.asp) ， 从 而 


让 该 学 生 能 立即 看 到 自己 交 送 的 问题 。 


11.1.4 教师 端的 设计 


教师 端的 功能 应 包括 浏览 问答 学 生 的 问题 以 及 对 问题 的 删除 管理 等 操作 。 
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1. 浏览 问题 
教师 浏览 学 生 提 问 的 界面 与 学 生 端的 界面 基本 相似 ， 如 图 11-3 所 示 。 
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| 删除 要 
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图 11-3 教师 浏览 学 生 提问 的 界面 


教师 浏览 学 生 提问 的 界面 同样 提供 分 页 查看 功能 ， 所 不 同 的 是 要 保证 未 回答 的 问题 显 
示 在 首页 ， 这 点 是 通过 为 select 语句 设置 查询 条 件 实现 的 。 显 示 栏 目 加 入 了 学 生 姓 名 ， 由 
于 problems 表 中 只 含有 登录 名 ， 要 获取 学 生 姓 名 则 必须 通过 多 表 查 询 ， 要 从 user 表 获 得 学 
生 姓 名 ， 所 以 select 语句 中 增加 了 表 间 关联 表达 的 条 件 。 另 外 ， 由 于 教师 在 查看 问题 的 过 
程 中 要 回答 学 生 问题 ， 并 对 某 些 问题 进行 删除 处 理 。 因 此 ， 在 显示 问题 时 提供 了 超 链 接 ， 
教师 可 通过 超 链接 进入 问题 回答 界面 。 为 了 实现 删除 问题 处 理 ， 在 每 行 前 面 增加 了 一 个 复 
选 框 ， 选 中 某 几 行 ， 单 击 “ 删 除 ” 按 钮 即 可 将 这 些 问 题 删除 ， 为 了 避免 误 删 ， 程 序 中 还 利 
用 JavaScript 脚本 进一步 对 删除 按钮 的 click 事件 进行 确认 

程序 3: 分 页 浏览 提问 


problemadmin .asp -一 -一 一 -一 一 -一 -一 -一 -一 一 一 -一 一 - 
<html> 

<head> 

<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<!-- #Include file="include\style.inc" --> 

</head> 

<body background="images\bg.gif’> 

<% strPage = Request.queryString("page") 

content = Request.queryString("content") 

Set objCnn=Server.CreateObject("ADODB.connection") 

objCnn.Open "datasource" 


以 下 为 了 处 理 基于 内 容 搜索 学 生 提问 
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if content<>” then 
strSQL = "select id,title,flag_answer,user,usemame from problems,user where problems.user=user. 
loginname and problems .title like '%"&content&"%' order by notflag answer, id desc " 
else 
strSQL = "select id ,title,flag_answer,user,username from problems, user where problems.user= 
User.loginname order by notflag answer, id desc" 
end if 
set rs=server.createobject("adodb.recordset") 
rs.open strSQL,objCnn,1,1%> 
<table border="0" cellspacing="1" width="100%"> 
<tr><td colspan="4"> 
<%if rs.eof then %> 
<p> 目 前 无 任何 问题 。</p></td></tr></table> 
<% response.end 
end if 
sumcount = rs.RecordCount 
rs.PageSize = 12 
intPageCount = rs.PageCount 
if Len(strPage) = 0 then strPage = "1" 
if int(strPage)<1 then strPage = "1" 
if int(strPage)>intPageCount then strPage = CStr(intPageCount) 
rs.absolutepage=cint(strpage) 
%> 
<form name="frmSearch" action="problemadmin.asp" method="get" > 
<p align="center">[ 本 页 是 第 <%=int(strPage)%>/<%=intPageCount%> 页 ] 
<% if int(strPage)>1 then 
%> [<a href="problemadmin.asp?page=1"> 第 一 页 </a>] 
[<a href="problemadmin.asp?page=<%=CStr( int(strPage)-1 )%>"> 前 一 页 </a>] 
<%end if 
if int(strPage)<intPageCount then 
%> [<a href="problemadmin.asp?page=<%=CStr( int(strPage)+1 )%>"> 下 一 页 </a>] [<a href= 
"problemadmin.asp?page=<%=intPageCount%>"> 最 后 页 </a>]<% 
end if%>&nbsp;&nbsp; 转 向 第 <input type=text name="page"” style='width:20px' 
maxlength=3 value="<%=strPage%>"> 页 &nbsp;&nbsp; 搜 索 问 题 为 ，<input type=text name="content" 
style='width:80px' maxlength=8 ><input type='image' src="images/go.gif" ></p></form> 
<form action="problemdelete.asp" method="POST" > 
<table width=100%> 
<tr class="tr3"><td width="5%" ALIGN="CENTER"> 选 中 </td> 
<td width="55%" align="center"> 标 题 (点 击 标题 可 解答 问题 )</td> 
<td width="8%" align="center"> 登 录 名 </td> 
<td width="10%" align="center"> 姓 ”名 </td> 
<td width="8%" align="center"> 回 答 否 </td></tr> 
<% 
dim flagcolor,classtype 
flagcolor = true 
for intRecord = 1 To rs.PageSize 
if rs.EOF then 
exit for 
end if 
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flagcolor = not (flagcolor) 


if (flagcolor) then 
classtype = "tr1" 
else 
classtype = "tr2" 
end if 


%> 
<tr class="<%=classtype%>"> 
<td width="5%" ALIGN="CENTER"> 
<input TYPE="CHECKBOX" NAME="id" VALUE="<%=rs("id")%>"></td> 
<td width="55%"> 
<pre><a href="problem _detail.asp?ID=<%=rs("ID")%>&page=<%=strpage%>"><%= rs("title")%></a> 
</pre></td> 
<td width="8%" align=center><%response.write rs("user")%> </td> 
<td width="10%" align=center><%response.write rs("username")%> </td> 
<td width="8%" align=center> 
<% if rs("flag_answer") = true then 
Response.Write "yes" 
else 
Response.Write "no" 
endif %> 
</td></tr> 
<% rs.MoveNext 
Next %> 
<tr><td colspan="4"> 
<input type="hidden" name="page" value="<%=strpage%>"> 
<p align=center> 
<input type="submit" value=" 删 除 " name="btndel" onclick="return confirm(' 确 定 删除 所 选 问题 
吗 ? Ji> 
</p></td></tr> 
</table> 
</form> 
</body> 


【注意 】 

(1) 本 例 中 还 包括 一 个 功能 ， 即 基于 学 生 问 题 内 容 进 行 搜索 查找 ， 这 里 利用 SQL 的 
like 运算 符 实现 模糊 查找 处 理 ， 只 要 搜索 问题 的 内 容 中 含有 要 查找 的 内 容 即 可 显示 出 来 。 

(2) 需 注 意 边 界 条 件 的 处 理 ， 当 数据 库 中 没有 一 个 学 生 问题 时 ， 显 示 出 一 个 信息 ， 然 
后 利用 response.end 方法 直接 停止 执行 程序 ， 这 样 逻 辑 上 就 显得 十 分 清晰 。 

(3) 注意 体会 显示 问题 时 为 后 续 操作 提供 导航 ， 首 先是 回答 问题 针对 每 个 问题 设计 
相应 的 超 链接 转 到 回答 问题 的 输入 界面 , 但 注意 要 为 超 链接 提供 URL 参数 。 参 数 的 提供 要 
根据 后 续 页 面 处 理 的 需要 来 设置 。 另 一 操作 是 删除 问题 ， 在 浏览 页 面 提供 有 表单 ， 针 对 每 
个 问题 提供 一 个 复 选 框 ， 选 中 的 问题 就 是 将 要 被 删除 的 对 象 ， 特 别 要 注意 的 是 ， 复 选 框 的 
名 称 和 值 如 何 与 问题 对 应 。 这 里 是 所 有 复 选 框 用 同一 个 名 字 ， 将 问题 标识 作为 相应 复 选 杠 
的 值 ， 这 样 在 后 续 页 面 中 根据 该 值 可 知道 要 删除 哪些 问题 。 
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2. 回答 问题 

在 回答 问题 页 面 要 显示 学 生 问 题 ， 注 意 超 链 接 传递 过 来 的 两 个 参数 ， 一 个 参数 是 问题 
标识 (ID) ， 用 于 查找 问题 ， 另 一 个 参数 是 page， 用 于 在 回答 完毕 后 返回 指定 的 页 。 教 师 
解答 学 生 提问 的 界面 如 图 11-4 所 示 。 
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图 11-4 教师 解答 学 生 提问 的 界面 
星 序 4: 输入 解答 界面 


<html> 

<head> 

<meta http-equiv="Content-Type" content= "text/html; charset=gb2312"> 
<!-- #Include file="include\style.inc" --> 


problem_detail.asp 


</head> 

<body> 

<% strID = Request.queryString("ID") 
strpage = Request.queryString("page") 


Set objCnn = Server.CreateObject("ADODB.Connection") 
objCnn.Open "datasource" 

' 根 据 问 题 标识 查找 问题 
strSQL = "SELECT id,title,answer FROM problems where ID="&strID 
Set rs = Server.CreateObject("ADODB. Recordset") 
rs.open strSQL ,objCnn,1,1 
%> 
<form action="problem_answer.asp" method="POST" > 
<table border="0" cellspacing="1" width="100%"> 
<input type="hidden" id="id" name="id" value="<%= strID %>"> 
<input type="hidden" id="page" name="page" value="<%=strpage%>"> 
<tr class="tr3"><td> 问 题 </td></tr> 
<tr class="tr1"><td><pre><%= rs("title")%></pre></td></tr> 
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<tr class="tr3"><td> 解 答 </td></tr> 

<tr class="tr1"><td> 

<textarea rows="10" name="answer" cols="80"><%=rs("answer")%></textarea> 
</td></tr> 

<tr><td><p><input type="submit" value=" 确 定 " id="ok" name="ok">&nbsp; 

<a href="problemadmin.asp?page=<%=strpage%>"> 返 回 </a></p></td></tr> 
</table> 

</form> 

</body> 

</html> 


【说 明 】 在 输入 表单 中 应 注意 两 点 ， 第 一 点 是 如 果 该 问题 教师 已 解答 ， 则 要 将 已 有 解 

答 显 示 出 来 ， 另 外 教师 还 可 以 更 改 解 答 ; 第 二 点 是 通过 隐 含 域 将 问题 ID 和 page 参数 传递 
给 后 续 处 理 程序 ， 请 读者 思考 : 如 果 将 隐 含 域 改 为 用 URL 参数 传递 的 办 法 ， 应 如 何 表示 ， 
在 后 续 页 面 中 又 该 如 何 读 取 。 

程序 5: 将 解答 写 入 数据 库 

--- problem_answer.asp ---- 一 一 -一 -一 -一 -一 一 -一 -一 -一 -一 -一 -一 一-- 

<% 

id = Request.Form("id") 

strAnswer = Request.Form("answer") 

strAnswer = replace(strAnswer,”™","") 

set conn = server.CreateObject("adodb.connection") 

conn.Open "datasource” 

strSQL = "update problems set flag_answer=true,answer = " & strAnswer & ”where id="&id 

conn.Execute(strSQL) 


response.redirect "problemadmin.asp?page="& Request.Form("page") 
%> 


【说 明 】 回 答 处 理 问 题 非常 简单 ， 只 需 使 用 update 语句 更 新 数据 库 表 ， 将 对 应 问题 的 
已 回答 标记 字段 (flag_answer) 置 为 True， 并 将 解答 字段 (answer) 更 新 即 可 。 
【思考 】 通 过 隐 含 域 传递 page 的 作用 ， 重 定向 的 URL 不 跟 参 数 有 何不 足 。 
3. 删除 学 生 问题 


---- problemdelete .asp -一 -一 一 -一 一- 一 -一 -一 一- 一 -一 -一 一- 一 
<% strpage = Request.Form("page") 
sqlpre = "DELETE FROM problems WHERE id =" 
set conn = server.CreateObject("adodb.connection") 
conn.Open "datasource” 
fori = 1 to request.form("id").count 
conn.Execute sqlpre & request.form("id")(i) 
next 
response.redirect "problemadmin.asp?page="&strpage 
%> 


【说 明 】 删 除 学 生 处 理 程序 是 一 个 典型 的 批量 处 理 的 范例 ， 在 查询 页 面 中 每 个 问题 对 
应 有 一 个 名 字 均 为 id 的 复 选 框 ， 这 些 复 选 框 的 值 分 别 为 对 应 的 问题 标识 。 在 此 程序 中 
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request.form("id") 所 得 到 的 是 一 个 集合 ， 集 合 中 的 每 个 元 素 即 为 选中 的 问题 对 应 的 问题 标 
识 ， 也 就 是 要 将 这 些 问题 删除 ， 此 时 即 可 通过 一 个 循环 实现 ，delete 语句 的 前 面部 分 相同 ， 
只 是 后 面 的 条 件 部 分 有 变化 。 

【思考 】for 循环 改 用 for each 实现 应 如 何 修改 程序 ? 


11.2 基于 XML 的 单元 自 测 应 用 


11.2.1 功能 概述 


基于 XML 的 单元 自 测 应 用 的 目标 是 在 网 络 课件 中 为 每 个 单元 安排 一 份 自 测 试卷 ， 学 
生 可 以 解答 该 份 试卷 ， 单 击 “ 交 卷 ” 按 钮 ， 程 序 将 自动 根据 试卷 中 的 标准 答案 对 学 生 进 行 
评分 ， 将 得 分 告诉 学 生 ， 并 显示 各 题 的 标准 答案 和 学 生 解 答 ， 以 便 学 生 对 比 检查 。 该 应 用 
完全 是 一 个 客户 方 浏览 器 上 的 交互 应 用 ， 综 合体 现 了 客户 方 编程 技术 的 运用 。 试 卷 存 储 在 
XML 文件 中 , 由 JavaScript 根据 当前 学 习 的 单元 装载 相应 的 试卷 ， 然 后 采用 XML DOM 技 
术 和 XSL 变换 技术 访问 XML 试卷 内 容 ， 并 利用 DHTML 技术 生成 相应 的 试卷 解答 界面 。 
依据 事件 代码 实现 解答 登记 和 评分 处 理 ， 并 将 解答 对 比 显示 给 学 生 。 单 元 测试 做 题 界 面 如 
图 11-5 所 示 。 


加 章节 菜单 导航 学 习 方式 - Wicreseft Internet 


上 文件 四 加 各 @) 查看 W) 收 苇 ) 工具 GD) 帮助 QI 
捷 征 加 | 公 ] http /1leeuhoswyztadat_do emp EISEal 


第 4 单元 自 测 有 El 习 
一 、 单 选 题 (每 小 题 1 分 


1. 在 Java 中 所 有 类 的 根 类 是 : 
A. java. lang. Object 


B. java. lang.Class 
C. java. applet. Applet 
D. java. avt.Frane 


CA CB Cc CD CE 
2. 在 同一 目录 编译 和 运行 以 下 两 文件 结果 如 何 ? 
/文件 Pl. java 


void afancyaethod() { 
Systen. out. println(“What a fancy method") 
} 


} 
1/ 文件 P2. java -| 


到 ] P| 
SE CTT TT Om 


图 11-5 单元 测试 做 题 界面 


11.2.2 ”测试 试卷 的 XML 表示 


为 了 节省 篇 幅 ， 这 里 只 给 出 了 3 类 试题 ， 且 每 类 试题 只 给 出 一 道 题 作为 样 例 。 整 个 试 
卷 的 根 结 点 为 paper， 各 类 试题 的 相关 标记 的 含义 如 表 11-2 所 示 。 
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表 11-2 试卷 中 XML 标记 的 含义 


试题 类 型 标 记 含义 
singlechoice 单 选 题 类 的 根 结 点 
score 每 道 试题 的 分 数 

单 选 题 shiti - 道 试 题 的 根 结 点 

本 道 试题 内 容 

answer 本 道 试题 标准 答案 
multichoice 多 选 题 类 的 根 结 点 
score 每 道 试 题 的 分 数 

多 选 题 timu - 道 试题 的 根 结 点 


content 本 道 试题 内 容 
本 道 试题 标准 答案 
多 项 填空 是 类 的 根 结 点 


多 项 填空 题 material 阅读 材料 
材料 中 一 段 内 容 
| 试题 内 容 中 一 个 空 


以 下 为 XML 试卷 文件 样 例 (exam3.xml) 


<?xml version="1.0" encoding="gb2312"?> 
<paper examtime="100"> 
<singlechoice> 
<score>1</score> 
<shiti> 
<content> 
如 何 定义 一 个 不 能 有 子 类 的 类 Key? 
A. class Key{} 
B. abstract final class Key {} 
C. native class Key {} 
D. finalclass Key {} 
</content> 
<answer>D</answer> 
</shiti> 
<shiti>..……...</shiti> ”<!-- 下 一 道 试题 --> 
</singlechoice> 
<multichoice> 
<score>1</score> 
<timu> 
<content> 
下 列 哪些 是 Java 中 合法 的 修饰 符 ? 
A. private 
B. public 
C. protected 
D. protect 
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</content> 
<answer>ABC</answer> 
</timu> 
<timu>.…...</timu> ”<!-- 下 一 道 试题 --> 
</multichoice> 
<integrity> 
<score>2</score> 
<material> 
<mycontent>public class Java 3 
{ int xy; /点 的 坐标 
public Java_3() {} 
public Java_3(int x,int y){<wk>this.x=x;this.y=y;</wk>} 
public Java_3(Java_3 p){<wk>x=p.x;y=p.y;</wk>} 


}</mycontent> 

<mycontent>...... </mycontent> ”<!-- 下 一 段落 --> 

</material> 

<material>.…….</material> ”<!-- 下 一 道 试题 --> 

</integrity> 

</paper> 

【说 明 】 由 于 一 类 试题 的 各 道 题 的 分 数 相同 ， 所 以 Score 标记 作为 试题 类 的 子 结 点 ， 
而 没有 安排 作为 每 道 试题 的 子 结 点 。 多 项 填空 题 考虑 到 一 定 的 通用 性 要 求 ， 每 道 试 题 为 一 


份 阅读 材料 (material) ， 其 中 包含 若干 段落 (mycontent) ， 在 每 段 中 安排 一 些 空 (wk) ， 
各 空 的 标准 答案 直接 在 wk 标记 中 。 


11.2.3 ”考试 解答 界面 的 生成 及 显示 处 理 


1. 试卷 的 装载 

首先 定义 一 个 函数 getData， 该 函数 将 在 页 面 加 载 时 由 OnLoad 事件 触发 执行 ， 它 将 完 
成 试卷 XML 文件 的 加 载 ， 并 通过 对 XML 文件 的 分 析 处 理 生成 试卷 解答 界面 的 HTML 代 
码 ， 最 后 用 DHTML 技术 将 解答 界面 的 HTML 代码 显示 在 页 面 中 。 

function getData( }{ 


xmldoc = new ActiveXObject("Microsoft. XMLDOM"); 
xmldoc.async = false; 


url1="exam"+zh+".xml"; /lzh 为 当前 学 习 的 章 号 
xmldoc.load(url1); 
root = xmldoc.documentElement' // 根 结 点 


/以 下 生成 试卷 解答 的 HTML 代码 字符 串 


2. 各 类 试题 解答 界面 的 生成 处 理 

在 各 类 试题 的 解答 界面 生成 处 理 中 ， 一 方面 要 显示 试题 内 容 ， 另 一 方面 要 生成 相应 的 
解答 控件 ， 同 时 要 解决 解答 控件 的 命名 和 相应 的 事件 处 理 问题 。 所 有 内 容 的 显示 处 理 均 通 
过 字符 串 的 拼接 来 完成 ， 要 显示 的 内 容 保存 在 res 字符 串 变 量 中 。 
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(1) 单 选 题 解答 界面 的 生成 处 理 


res=" 一 、 单 选 题 </font><font color='green'><b>( 每 小 题 " 
res+= root.selectSingleNode("singlechoice/score").text+" 分 )</b></font><td>" 
items= root.getElementsByTagName("singlechoice/shitycontent ) 
ct=0 /记录 试题 序号 
for (i=0;i<items.length;i++){ 
ct=ct+1; 
res+= "<tr><td colspan='3'><pre><font face=' 黑 体 ' color='blue'><b>" 
res+= ct+"</b></font>."+items(i).text+"</pre></td></tr><tr>" 
res+= "<td width='10%'></td><td colspan='2' width='909%'>” 
res+= "<input type='radio' value='A' name='x" 
res+= ct+" onclick='log(this,"+ct+")>A&nbsp;&nbsp;”" 
res+= "<input type='radio' value='B' name='x"+ct 
res+= " onclick="log(this,"+ct+")>B&nbsp;&nbsp;" 
res+= "<input type='radio value='C' name='x"+ct 
res+= " onclick="log(this,"+ct+")>C&nbsp;&nbsp;" 
res+= "<input type='radio value='D' name='x"+ct 
res+= " onclick="log(this,"+ct+")>D&nbsp;&nbsp;" 
res+= "<input type='radio value='E' name='x"+ct 
res+=” onclick='log(this, "+ct+")>E” 
res=res+"</td></tr>" 


} 


【说 明 】 在 单 选 题 的 解答 界面 生成 处 理 中 有 两 个 要 点 : @ 控件 的 命名 ， 这 里 采用 x 作 
为 前 级 后 跟 试 题 序号 的 办 法 ， 注 意 同一 题 的 各 单 选 按钮 名 称 相同 ， 如 此 才能 达到 单 选 的 日 
的 。 @ 事件 的 处 理 ， 如 何 将 用 户 选择 的 解答 通过 事件 操作 记录 下 来 ， 以 便 评分 处 理 。 这 里 
采用 了 传递 试题 序号 和 代表 按钮 控件 对 象 本 身 的 变量 this 的 办 法 实现 解答 选择 信息 的 传 
递 ， 试 题 序 号 知道 做 的 是 哪 道 题 ， 而 this 参数 则 可 以 知道 点 击 了 哪个 选项 ， 从 而 可 以 根据 
它 获取 选项 的 值 。 

(2) 多 选 题解 答 界面 的 生成 处 理 


res+="<p><font color='blue'><b> 二 、 多 选 题 </font><font color='green'>" 
res+=" (每 小 题 "+root.selectSingleNode("multichoice/score").text 
res+=" 分 )</b></font></p>" 
items=root.getElementsByTagName("multichoice/timu/content") 
ct=0 
for (i=0;i<items.length;i++) { 

ct=ct+1; 

res+= "<p><pre><font face=' 黑 体 ' color='blue ><b>'"+ct 

res+= "</b></font>."+items(i).text+"</pre></p>” 

res+= "<input type='checkbox value=A' name=m1_ "+ct 

res+= " onclick="logmultichoice(this, 1,"+ct+")>A&nbsp;&nbsp;" 

res+= "<input type='checkbox' value='B' name="m2_"+ct 

res+= ”onclick='logmultichoice (this,2,"+ct+")>B&nbsp;&nbsp;" 

res+= "<input type='checkbox' value='C' name='m3 “+ct 

res+= "onclick='logmultichoice (this,3,"+ct+")>C&nbsp;&nbsp;" 

res+= "<input type='checkbox' value='D' name='m4 “+ct 
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res+= ”onclick='logmultichoice (this,4,"+ct+")>D&nbsp;&nbsp;”" 
res+= "<input type='checkbox' value='E' name='m5 “+ct 
res+= ”onclick='logmultichoice (this,5,"+ct+")>E” 


} 


【说 明 】 多 选 题 的 控件 命名 与 单 选 题 类 似 ， 只 是 同一 题 的 各 个 复 选 框 不 同名 ， 主 要 是 
解答 处 理 函 数 传递 的 信息 要 3 个 参数 ， 第 一 个 参数 是 this， 代 表 选 择 的 那个 复 选 框 对 象 ; 
第 二 个 参数 是 选项 的 序号 ， 以 便 登记 时 知道 选择 了 哪个 选项 ;第 三 个 参数 是 试题 序号 。 

(3) 多 项 填空 题解 答 界面 的 生成 处 理 

多 项 填空 题 将 针对 试题 中 的 空 的 位 置 生成 相应 的 文本 框 供用 户 填 写 解答 ， 处 理 时 涉及 
空 的 查找 与 转换 ， 利 用 XSL 变换 处 理 可 以 较 容 易 地 进行 处 理 。 

res+= "<p><font color='blue'><b> 三 、 多 项 填空 题 </font><font color='green'>" 

res+= " (每 空 "root.selectSingleNode("integrity/score").text 

res+= "分 )</b></font></p>" 

root = root.selectSingleNode("integrity") // 选 取 多 项 填空 类 试题 的 根 结 点 


xsldoc = new ActiveXObject("Microsoft.XMLDOM"); 
xsldoc.async = false; 


xsldoc.load("exam2 .xsl"); /装载 XSL 变换 程序 
x = root.transformNode(xsldoc); // 对 整个 多 项 填空 类 试题 进行 变换 并 返回 变换 结果 
res = res+x; // 将 处 理 结果 拼接 到 HTML 显示 串 res 中 


以 下 为 相应 的 XSL 变换 程序 (exam2.xsl) 


和 eXxam2.XS| -2 
<?xml version ="1.0” encoding="GB2312"?> 
<xsl:stylesheet xmlns:xsl="http://www.w3.org/TR/WD-xsl" languange="JavaScript"> 


<!-- 模板 1 --> 

<xsl:template match="integrity"> 
<xsl:eval>var st=0;""</xsl:eval> 
<xsl:eval>var ct=0;""</xsl:eval> 
<xsl:for-each select="material"> 

<tr><td colspan='3> 

<xsl:apply-templates select="mycontent"/> 
</td></tr> 

</xsl:for-each> 

</xsl:template> 


<I-- 模板 2 --> 

<xsl:template match="mycontent"> 

<pre><b><font color='#800000'> 

<xsl:eval>st=st+1;" 试 题 "+st+":"</xsl:eval></font></b> 
<xsl:apply-templates select="wk|brltext()"/></pre> 
</xsl:template> 


<!-- 模板 3 --> 
<xsl:template match="wk"> 
<u><b><xsl:eval>ct=ct+1;" ("+ct+") "</xsl:eval></b></u> 
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<input type="text" size="16"> 

<xsl:attribute name="name">w<xsl:eval>ct</xsl:eval> 

</xsl:attribute> 

<xsl:attribute name="onchange">logkong(this,<xsl:eval>ct</xsl:eval>) 
</xsl:attribute> 

</input> 

</xsl:template> 


<!- 模板 4--> 
<xsl:template match="br"><br/></xsl:template> 


<!- 模板 5--> 
<xsl:template match="text()"><xsl:value-of/></xsl:template> 
</xsl:stylesheet> 


【说 明 】 这 部 分 的 处 理 有 一 定 难 度 ， 为 了 实现 将 多 项 填空 题 中 的 空 用 特殊 的 输入 框 显 
示 ， 程 序 中 共 定 义 了 如 下 5 个 模板 : 

@ 模板 1 定义 了 多 项 填空 类 试题 的 根 结 点 的 处 理 策略 ， 其 中 定义 了 两 个 变量 ， 一 个 是 
st 代表 试题 序号 ， 另 一 个 是 ct 代表 空 的 序号 。 模 板 中 对 每 道 多 项 填空 题 (material) 通过 for 
each 循环 进行 匹配 处 理 ， 每 份 阅读 内 容 Croyeontent) 调用 模板 2 进行 处 理 。 

@ 模板 2 首先 计算 输出 试题 的 序号 ,然后 对 其 中 的 内 容 (包括 文本 和 填空 项 ) 分 别 调 
用 模板 3、 模 板 4 和 模板 5 进行 处 理 。 

@ 模板 3 用 于 填空 项 的 匹配 处 理 , 它 包 括 计 算 和 显示 一 个 填空 项 的 序号 。 另 一 个 难点 
是 产生 输入 文本 框 , 文本 框 中 的 属性 通过 xsl:attribute 标记 进行 定义 , 标记 名 用 m 作为 前 级 
后 跟 空 的 序号 。onchange 事件 属性 定义 的 函数 logkong 包括 两 个 参数 ， 一 个 是 代表 文本 框 
对 象 的 this 参数 ， 另 一 个 是 空 的 序号 。 

图 模板 4 实现 对 XML 文本 中 <br> 标 记 的 特殊 处 理 ， 以 保证 <br> 标 记 按 换行 处 理 。 

@@ 模板 5 用 于 文本 的 匹配 处 理 ， 它 只 是 将 文本 的 内 容 照 原 样 输出 。 

多 项 填空 题 变换 后 的 页 面 显示 效果 如 图 11-6 所 示 。 
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图 11-6 多 项 填空 题 变换 后 的 页 面 显示 效果 
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3. 解答 界面 的 显示 处 理 
函数 getData 的 最 后 一 段 脚本 代码 以 及 页 面 显示 层 的 定义 代码 如 下 ada DHTML 
技术 将 生成 的 显示 字符 串 〈res) 写 入 页 面 中 标识 名 为 me 的 层 中 ， 从 而 实现 动态 显 


< 上 -在 试卷 的 开头 和 结尾 均 安排 了 交卷 按钮 ， 开 头 部 分 省 略 了 代码 --> 

res+= "<p>&nbsp;&nbsp;<input type='button' value=' 交卷 " 

res+= " onclick='checkresult( ) ></p>" 

me.innerHTML = res; /将 拼接 好 的 解答 界面 的 HTML 串 写 入 名 字 为 me 的 层 中 
} 

</script > 

<body onload="getData( )"> 

<div id="bt"></div> ”<!-- 显示 试卷 标题 的 层 --> 

<div id="me"></div> ”<!-- 显示 试题 解答 界面 的 层 --> 

</BODY> 


【说 明 】 试 卷 标题 层 的 显示 在 这 里 未 介绍 ， 它 只 是 将 第 几 单元 测试 的 文字 显示 出 来 ， 
单元 的 值 取决 于 用 户 章节 导航 中 选择 了 哪 章 ， 需 要 通过 信息 传递 得 到 。 


11.2.4 考试 的 解答 记录 、 交 卷 评 分 及 答案 对 比 的 显示 


1. 通过 数组 记录 解答 
通过 数组 记录 用 户 对 各 题 的 解答 选择 , 单 选 题 和 多 项 填空 题 的 解答 均 用 一 维 数组 记录 ， 
多 选 题 用 二 维 数组 记录 , JavaScript 不 能 直接 定义 二 维 数组 , 而 应 通过 定义 数组 的 数组 实现 。 


var arr=new Array(100); // 单 选 题 
var multich=new Array(50); // 多 选 题 
for (k=0;k<arr.length;k++) 
multich[k]=new Array(5); // 多 选 题 的 5 个 选项 
var kong=new Array(30); // 多 项 填空 题 


2. 记录 解答 的 函数 

将 用 户 的 解答 选择 记录 到 数组 中 ， 这 样 在 判 分 处 理 时 将 更 快捷 。 通 过 用 户 答题 时 触发 
的 事件 而 执行 相应 的 函数 处 理 。 单 选 题 和 多 选 题 的 记录 分 别 是 依托 选项 按钮 和 复 选 框 的 
onclick 事件 ， 而 多 项 填空 题 的 记录 则 是 依托 文本 框 的 onchange 事件 。 

(1) 单 选 解答 记录 函数 


function log(m,i){ // 第 i 道 题 
arr[]=m.value; 
) 
(2) 多 项 填空 解答 记录 函数 
function logkong(m,i)f // 第 i 个 填空 题 


kong[i]=m.value; 


| 
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(3) 多 选 解答 记录 函数 
function logmultichoice(m,j,if // 第 i 道 题 的 第 j 个 选项 


if (m.checked) 
multich[i]jj-1]=m.value; 
else 
multich[i]0- 人 =”; 
} 
3， 交卷 处 理 函 数 


单 击 “ 交 卷 ” 按 钮 将 触发 执行 checkresult 函数 ， 该 函数 将 访问 XML 文件 读 取 每 道 试 
题 的 标准 答案 与 数组 中 记录 的 用 户 解答 进行 对 比 ， 进 而 计算 得 分 。 为 了 将 解答 对 比 和 得 分 
告诉 用 户 ， 和 前 面 的 生成 试卷 解答 页 面 类 似 ， 这 里 同样 要 进行 显示 内 容 的 拼接 处 理 ， 并 在 
拼接 后 的 HTML 文本 中 显示 试题 内 容 、 标 准 答案 和 用 户 解答 ， 如 图 11-7 所 示 。 计 算 的 得 
分 通过 对 话 框 提 示 给 用 户 。 


汪 章 节 莱 单 导航 学 习 方式 - 生 ft Internet Erplorer | 
| 文件 四 ”编辑 E) 查看 W) 收藏 A) 工具 QD) 帮助 0D | 心 
| 于 杜 W | 多] Mtp-//1ocdhost/stodent_do ep EEC 


第 4 单元 自 测 (答案 对 比 ) 


一 . 单 选 是 


1, 在 Java 中 所 有 类 的 根 类 是 : 
A java. lang, Object 

B. java. lang.Class 

C. java. applet. Applet 

D. java. awt. Frane 


答案 :A ， 你 的 解答 :A 


2. 在 同一 目录 编译 和 运行 以 下 两 文件 结果 如 何 ? 
// 文 件 Pl. java 
package MyPackage 
class PI{ 
void afancynethod() { 


cure we SE oon、 


E22 Ti [网 可 天 丰 有 


图 11-7 答案 对 比 显示 界面 


以 下 为 函数 代码 : 

function checkresult ( ){ 

score=0; // 用 于 累计 用 户 得 分 
totalscore=0; // 用 于 累计 试题 总 分 值 


str="<center><strong><font color='red'>( 答 案 对 比 )</font></strong>" 
str=str+"</center><br><table><td width=5></td><td>" 

* 以 下 为 单 选 题 的 解答 对 比 处 理 */ 
s=xmldoc.selectSingleNode("//singlechoice/score"); 
xscore=parselnt(s.text); // 单 选 题 每 题 分 值 
ans=xmldoc.selectNodes("//singlechoice/shiti"); 
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no=1; // 试 题 序 号 
mynodes=ans.length; // 单 选 题 数 量 
str=str+"<font color='blue'><b> 一 . 单 选 题 </b></font><br>"; 
for (k=0;k<mynodes;k++) { 
m=arr[no]; 
=ans.item(k).childNodes.item(1).text; // 获 取 试 题 标准 答案 
totalscore=totalscore+xscore; 
str +="<pre><b>"+(k+1)+"</b>." 
str += ans.item(k).childNodes.item(0).text+"</pre><br>"; 
if (m==x) { 
Score=score+XScore; 
str+= "答案 : "+x+" ,你 的 解答 : "+m+"<br>"; 
}else 
str+= "答案 : <font color='red'>"+x+"</font>, 你 的 解答 : "+m+"<br>"; 
no=no+1; 


} 

/* 以 下 为 多 选 题 的 解答 对 比 处 理 */ 
s=xmldoc.selectSingleNode("//multichoice/score"); 
xscore=parselnt(s.text); 
ans=xmldoc.selectNodes("//multichoice/timu"); 

no=1; 

mynodes=ans.length; 

str+=+"<br><font color='blue'><b> 二 .多 选 题 </b></font><br>"; 
for ( k=0;k<mynodes;k++) { 


m="™"; 

for(d=0;d<5;d++) m=m+multich[nol[d]; /从 数组 取得 用 户 解答 
=ans.item(k).childNodes .item(1).text; 

totalscore=totalscore+xscore; /累计 试题 总 分 值 


Str += "<pre><b>"+(k+1)+"</b>." 
str += ans.item(k).childNodes.item(0).text+"</pre><br>"; 
if (m==x) { 

Score=score+Xscore; 

str+= "答案 : “+x+”， 你 的 解答 : "+m+"<br> 


) 


else 
str+= "答案 : <font color='red'>"+x+"</font>, 你 的 解答 : "+m+"<br>"; 
no=no+1; 


} 

/* 以 下 为 多 项 填空 题 的 解答 对 比 处 理 */ 
s=xmldoc.selectSingleNode("//integrity/score"); 
xscore=parselnt(s.text); 

str += "<br><font color='blue'><b> 三 .多 项 填空 题 </b></font><br>"; 
xsldoc = new ActiveXObject("Microsoft.XMLDOM"); 
xsldoc.async = false; 

xsldoc.load("exam3.xs|"); 
root=xmldoc.selectSingleNode("//integrity"); 
res1=root.transformNode(xsldoc); 

str=str+res1; 
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ans=xmldoc.selectNodes("//wk"); 

no=1; 

mynodes=ans.length; 

for ( k=0;k<mynodes;k++){ 
m=kong[no]; 
x=ans.item(k).text; 


totalscore=totalscore+xscore; // 累 计 试 题 总 分 值 
if (m==x) { 
score=score+xscore; // 解 答 正确 ， 累 计 得 分 


str += "<font color='blue'><b> 空 ("+(k+1)+")</b></font>. 答 案 : "+x 
str +=" ， 你 的 解答 : "+m+"<br> ; 

jelse{ 
str +="<font color='blue'><b> 空 ("+(k+1)+")</b></font>. 答 案 : " 
str +="<font color='red'>"+x+"</font> ， 你 的 解答 : "+m+"<br>"; 


no=no+1; 
} 
Str=str+"</td></table>"; 
score=Math.floor(score*100/totalscore); 1// 折 算 为 百分制 分 数 
alert(" 考 试 分 数 〈 折 算 为 百分数 ) : "+ score); // 告 诉 用 户 得 分 
me.innerHTML=str; // 将 答案 对 比 显示 出 来 


} 


【说 明 】 多 项 填空 题 显示 处 理 仍 用 到 XSL 变换 ， 和 前 面 的 处 理 基 本 一 样 ， 只 是 对 空 的 
处 理 做 了 变化 ， 不 再 显示 输入 框 ， 而 是 显示 一 个 前 后 加 小 括号 的 空 符号 ， 并 加 有 下 划 线 表 
示 。 以 下 为 相应 模板 的 代码 : 

<xsl:template match="wk"> 

<U><b><font color='red'><xsl:eval>ct=ct+1;" ("+ct+") "</xsl:eval></font></b></u></xsl:template> 


11.3 网络 课件 导航 菜单 的 设计 


导航 菜单 是 网 络 课件 中 使 用 最 频繁 的 部 件 ， 它 的 设计 既 要 考虑 用 户 使 用 的 方便 性 ， 又 
要 考虑 快速 响应 的 特点 ， 同 时 还 要 设法 减轻 服务 器 和 网 络 的 负担 。 


11.3.1 导航 菜单 的 设计 要 求 


学 生 学 习 的 操作 页 面 由 3 帧 构成 : 一 是 系统 功能 图 标 区 ;二 是 导航 菜单 ， 三 是 内 容 显 
示 区 ， 如 图 11-8 所 示 。 导 航 菜单 的 处 理 包 括 两 部 分 : 一 是 要 根据 选择 的 章 、 节 、 问 题 逐 级 
展开 目录 树 ， 二 是 要 根据 用 户 的 选择 显示 网 页 内 容 。 导 航 菜单 初始 打开 的 章 为 教师 指定 的 
“当前 章 ”， 用 户 点 击 目录 树 的 结 点 将 根据 该 结 点 的 位 置 生成 新 的 目录 树 ， 同 时 在 内 容 显 
示 区 显示 该 结 点 对 应 的 教学 页 面 。 
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入 章节 训 于 导 骸 学习 方式 - Wicros 

件 吕 久 押 EE) 豆 看 WD 收 戌 ) 工具 中 和 助 0 
WE http: /lochost/student_do. asp ESEal 
i [oe  。 想 昌 辐 


教 季 测 试 。 讨论 答疑 。 作业 实验 


学习 双手 


权 介 孝 师 介绍 六 考核 方法 
例 3-10: 第 出 函数 和 输入 函数 的 使 用 
【注意 】 输入 与 输出 函数 只 能 在 客户 端 运行 ， 不 能 在 服务 器 端 运行 。 


【编程 练习 ] 编写 一 个 程序 从 辐 入 对 话 框 输入 一 个 不 数 ， 计 算 该 数 的 阶乘 ， 并 通过 对 话 


: <html> 

: <body> 

: 《script language="vbscript”> 
x=InputBox( “输入 一 个 整数 ",””) 
7=1 “存放 阶乘 值 
for k=2 to _ 


Rl E 


男 nlml ml ml mE 


图 11-8 学 生 主页 面 帧 的 划分 
11.3.2 ”基于 XML 的 导航 菜单 设计 


基于 XML 的 导航 菜单 的 设计 思路 是 将 与 章节 导航 相关 的 信息 生成 XML 表示 形式 , 将 
XML 数据 传递 到 客户 端 ， 由 JavaScript 代码 访问 XML 数据 ， 并 利用 DHTML 技术 实现 导 
航 菜 单 目 录 树 的 动态 变化 。 

1. 章节 导航 信息 的 XML 文本 格式 

以 下 为 表示 章节 导航 信息 的 XML 文本 格式 ， 章 结 点 、 节 结 点 、 问 题 结 点 按 层次 结构 


进行 组 织 。 每 章 下 面包 含 若干 节 ， 每 节 包含 若干 问题 。 所 有 表示 章 、 节 、 问 题 的 结 点 均 用 
node 标识 ， 每 个 node 结 点 包括 标题 (title) 、 结 点 内 容 文件 名 〈url) 两 个 属性 。title 用 于 


导航 菜单 各 级 标题 的 显示 ，url 为 结 点 对 应 的 HIML 文件 名 ， 形 式 为 “text 章 号 - 节 号 -问题 
号 .htm”。 
存放 章节 层次 结构 的 XML 文件 的 格式 如 下 : 


-一 -chapmenuXxml- 一 -一 -一 一 
<?xml version='1.0' encoding='gb2312'?> 
<directory> 
<node title="JAVA 概述 " url="text1-0-0.htm" > <!-- 章 结 点 --> 
<node title="> 面 向 对 象 概述 "url="text1-2-0.htm"> <-- 节 结 点 --> 
<node title="> 面 向 对 象 与 面向 过 程 区 别 "url="text1-2-1.htm "/> 
< 上 -问题 结 点 -> 
Sb <!-- 其 他 问题 --> 
</node> 
SS <!-- 其 他 节 --> 
</node> 
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ed <!-- 其 他 章 --> 
</directory> 
2. 菜单 显示 处 理 


以 下 程序 利用 JavaScript 脚本 装载 访问 XML 文档 , 并 通过 对 文档 的 分 析 生 成 导航 菜单 。 
这 里 的 关键 是 list 函数 的 设计 ， 在 list 函数 中 包括 3 个 参数 ， 分 别 表 示 章 、 节 、 问 题 ， 该 函 
数 的 功能 是 根据 指定 的 参数 显示 导航 菜单 ， 并 在 内 容 显 示 帧 中 显示 对 应 当前 结 点 的 HTML 
内 容 。 页 面 初 始 装载 时 ， 利 用 onload 事件 让 菜单 默认 打开 第 1 章 内容 (text1-0-0.htm) 。list 
函数 的 代码 包括 两 部 分 ， 第 一 部 分 是 获取 当前 结 点 对 应 的 URL 文件 名 ,并 在 内 容 显示 区 显 
示 对 应 的 页 面 内 容 ; 第 二 部 分 是 根据 章节 参数 生成 用 来 显示 导航 菜单 的 HTML 字符 串 ， 并 
将 生成 的 导航 菜单 显示 在 menu 层 定义 的 位 置 ， 导 航 菜单 内 容 按 表格 形式 进行 排列 ， 菜 单 
中 显示 每 条 标题 的 单元 格 定 义 了 onclick 事件 让 其 调用 list 函数 实现 与 指定 章节 的 关联 。 

<html><head> 

<script type="text/javascript"> 


Var root; 
var kcpath="<%=request.cookies("path")%>"; // 获 得 课程 内 容 的 存储 路 径 


function init() { 
var xmldso = new ActiveXObject("Microsoft.XMLDOM"); 
xmldso.async="false"; 
xmldso.load("chapmenu.xml"); 


root=xmldso.documentElement; /1XML 文档 的 根 结 点 
if (root.hasChildNodes) 
list(1,0,0); // 默 认 打开 第 1 章 的 内 容 
} 
function list(zh,jie, wt)}{ 


/以 下 取得 当前 要 操作 访问 的 结 点 
currentnode=root.childNodes.item(zh-1); 


if (jiel=0){ 
currentnode= currentnode.childNodes.itemdjie-1); 
if (wt!=0) 
currentnode= currentnode.childNodes .item(wt-1); 
1 
url=currentnode.getAttribute("url"); // 得 到 当前 结 点 的 URL 地 址 
if (urll="") { 


top.main.location=kcpath+"/"+url; // 在 main 帧 中 显示 URL 内 容 


/* 以 下 拼接 导航 菜单 显示 的 文本 串 */ 

str="<table border=0 cellPadding=0 cellSpacing=0><td width=20><td width=20><td width=20><td 
width=20><td width=90% align=left><tr>"; 

m=root.childNodes.length; // 求 章 数 

for (i=1;i<=m;it+) { // 处 理 所 有 章 

Xx=root.childNodes item(i-1).getAttribute( title ); 

str+= "<td><img border=0 src='midplus.gif ></td>" 
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str+= "<td><img border=0 src='close.gif ></td>" 


str+= "<td onclick='return list("+i+",0,0) style='cursor:hand' colspan=3 " 

str+= "align=left><nobr>"+"<font color='yellow'>"+X 

str+= "</font></nobr></td><tr>"; 

if(zh!=i) continue // 如 果 不 是 当前 章 ， 则 跳 过 以 下 代码 
n = root.childNodes .item(i-1).childNodes.length; // 求 本 章节 数 

thiszhang= root.childNodes item(i-1); /得 到 当前 章 结 点 


for (p=1;p<=n;p++) { 
x2= thiszhang.childNodes.item(p-1).getAttribute("title"); 
str+= "<td ><img border=0 src='line.gif ></td>" 


Str+ 


<td><img border=0 src="m 


// 当 前 章 要 展开 相应 节 ， 处 理 本 章 所 有 节 


idblk.gif ></td>" 


str+= "<td><img border=0 src='close.gif ></td>" 

str+= "<td colspan=2 align=left onclick="list("+i+","+p+",0)"™" 
str+= " style='cursor:hand'><nobr>"+x2+"</nobr></td><tr>"; 
if(jie!l=p) continue 
n2= thiszhang.childNodes.item(p-1).childNodes.length; ” // 当 前 节 的 问题 数 


// 如 果 不 是 当前 节 ， 则 跳 过 以 下 代码 


thisjie= thiszhang.childNodes.item(p-1); // 当 前 节 结 点 
for (t=1;t<=n2;t++) { // 展 开 当 前 节 的 所 有 问题 
t1=t-1; 


str+= "<td><img border=0 src='line.gif ></td>" 
str+= "<td><img border=0 src='line.gif ></td>" 


<td><img border=0 src='mi 


<td align=left onclick="i 


idblk.gif ></td>" 


“<td width=20><img border=0 src='close2.gif></td>" 


st("+it","+p+", "+t " 


str+= "style='cursor:hand><nobr><font color='"99FFCC'>" 
str+= thisjie.childNodes.item(t1).getAttribute("title") 
str+= "</font></nobr></td><tr>"; 


jr 
yi 
} 


str=str+"</table>"; 
menu.innerHTML=str; 


} 


</script> 
</head> 


<BODY onload="init()" 


<div id="menuy"> </div> 
</center></body></html> 


【说 明 】 注 站 


循环 来 


展开 当前 访问 的 知识 点 ， 上 


list 函数 的 3 个 参数 与 当前 访问 的 章节 知识 点 的 关系 ， 程 序 中 用 了 : 


/问题 循环 
// 节 循环 
// 章 循环 


background="images/nav.gif'" ><center> 


4 有 访问 到 问题 时 才 会 实际 执行 到 第 三 重 循环 。 当 前 知识 


点 的 URL 内容 的 课程 路 径 信息 (kcpath) 存储 在 Cookie 变量 中 ,在 用 户 进 入 课程 时 通过 查 
阅 数据 库 中 课程 的 内 容 路 径 信息 给 Cookie 赋值 ， 每 门 课程 的 内 容 放 在 一 个 独立 的 路 径 下 。 


为 了 实 


时 需 注意 表格 


山内 容 的 逐 级 缩 进 显示 ， 月 


这 样 可 形成 紧凑 的 内 容 排 列 。 


日 到 几 个 显示 目录 树 的 小 图 片 ， 并 通过 表格 进行 定位 ， 此 


元 格 的 宽度 和 数量 设置 ， 图 片 所 在 单元 格 的 宽度 基本 上 就 是 图 片 的 大 小 ， 
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11.4 网 络 考试 系统 


网 络 考试 系统 是 网 上 教学 系统 的 一 个 较为 复杂 的 部 分 ， 涉 及 的 环节 比较 多 ， 包 括 考试 
的 进入 控制 、 考 试 的 组 卷 、 考 试 试题 及 解答 界面 的 显示 设计 、 考 试 的 限时 、 考 试 成 绩 的 计 
算 、 学 生 解 答 的 记录 、 考 试 分 析 等 。 以 下 就 学 生 端 考试 功能 的 主要 部 分 进行 重点 介绍 。 


11.4.1 考试 界面 布局 


整个 考试 界面 由 3 帧 组 成 ， 如 图 11-9 所 示 。 上 面 的 一 帧 用 来 进行 定时 显示 控制 ， 将 显 
示 剩 余 时 间 ， 并 在 剩余 时 间 用 完 时 自动 提交 答题 卡 的 交卷 表单 ， 左 边 一 帧 显示 试题 内 容 ; 
右边 一 帧 显示 答题 卡 。 整 个 框架 页 面 代 码 如 下 


-examlistasp 一 一- 
<frameset border="0" framespacing="0" rows="27,*" frameborder="0"> 
<frame name="up” src="examtime_limit.asp" scrolling="no"> 
<frameset border="1" framespacing="0" cols="72%,*"> 
<frame name="menu" src="paper_list.asp" scrolling="auto" > 
<frame name="right” src=" answer_card.asp" scrolling="auto" > 


</frameset> 
</frameset> 
Tnteraet spa Lalxl 
区 
PBL 
全 网 上 考证 考试 剩 人 时 闻 ，1 小 时 :38 分 :62 
一 ， 单 项 选择 是 和 答题 卡 - 
上. 当 单 击 按钮 和 锯 接 地 方 时 协 仔 的 Tscript 命 令 是 ，《 、 单 项 选择 题 
全 Lou On Oc On Or 
mai 2 O04 Ca Oc On Or 
a. 问 只 有 一 - 问 
二 同 二 组 人 和 近 的 每 全 志 近 名 和 各 了 天 SO a pA 
C. <INPUT> 标记 的 TYPI 设 | CHECKHOE 
人 同一 组 单 选 按 钥 的 每 个 单 迁 按 甸 是 通过 VALUE 属 性 去 区 分 TO Oy Oe Op OR 
6. CA CB Cc CD OF 
3. 下 列 哪 一 个 画 数 可 以 将 数值 型 特 换 为 字符 素 _ a 
4) Chate RE Or Oo Ob Ob Gn 
D) CInt 
0 catr 
9 Ets § CA ca Ce cp ca 
9. CA ca cc cp ca 
4 在 Javascrip 脚 步 本 中 ， 以 下 语句 用 法 中 ， 不 正确 的 是 1) 。 
A wae; suntey, 10. Ch CB cc cp ca 
3;ptex; D var result=(ts)=10)71:0; 二 、 多 项 选择 题 
5. 训 在 浏览 震中 莹 出 “欢迎 你 1” 字样 的 是 ) 1. Da Da De Os Os 
<% dpcument. Write“ 欢迎 你 !” 
B、<% response. write “欢迎 你 1” 2. Da Ds Ge Dy Ds 
Cresponse.write “ 欢 凶 你 | 
信人 WTeqiest.write “区 好 你 1” 区 1 Da Dr Oc Os Os 
6. 若 帮 音 提交 的 煞 据 中 包含 着 一 形 ， 或 大 数 重 的 文本 ， 此 对 夫 音 的 提交 方法 应 该 采用 (】 。 4 Ga Ca Ce D Da 
人 et B.Subnit CPost D.Resct 
5. Du Ds De Dry Os 
T- 若 可 获得 名 为 login 的 玫 单 中 ， 名 为 txtuser 的 文本 输入 框 的 值 ， 以 下 获取 的 方法 中 ， 正 确 的 是 1) : 
oo B usernane=document.txtuser- yalue 4 Ca Da De D Da 
C sernane=iocuaent,1otin txtuser [userpame=iocuhert txtuser value a 
习 三 - 是 非 题 加 
| 
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图 11-9 考试 界面 
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11.4.2 ”考试 组 卷 程序 


人 首先 要 根据 组 卷 策略 产生 试卷 。 系 统 中 包括 5 类 试题 ， 各 类 
试题 的 抽 题 策略 是 一 致 的 ， 只 是 从 不 同 数据 库 表 格 中 抽 题 。 因 此 ， 系 统 中 专门 设计 了 一 个 
函数 pickst 实现 抽 题 功能 ， 其 中 包括 数据 库 连 接 、 表 格 、 抽 题 数 量 、 考 核 知识 点 范围 、 难 
度 共 5 个 参数 。 

1， 从 题库 中 根据 组 卷 条 件 选取 试题 的 函数 


不 同类 型 的 试题 存储 在 不 同 的 表格 中 ， 所 有 这 些 表格 的 字段 类 似 ， 其 主要 字段 说 明 如 
下 ( 注 : 本 例 只 用 到 前 3 个 字段 ) 。 
st_no: 试题 编号 
i 试题 所 属 知识 点 ， 本 系统 中 每 道 试题 只 能 属于 某 个 知识 点 。 
difficulty: 试题 难度 系数 。 
content: 试题 内 容 。 
answer: 标准 答案 。 
头 下 为 一 个 包含 文件 ， 其 中 给 出 了 选 题 函 数 的 定义 ， 有 具体 代码 如 下 : 


过 DOOOCOI 


一 pickupstinc -一 一 一 
<script language="vbscript" runat=Server> 
function pickst(conn, table , count1 ,knowledges,diff) 
'conn 为 数据 库 连 接 ，table 为 数据 库 表格 ，count1 为 选 题 数量 
"knowledges 为 考核 知识 点 集合 ，diff 为 难度 
if count1 = 0 Then 


pickst ="™ ' 选 题 数量 为 0， 函 数 返 回 空 串 
else 
Randomize 
point = split(knowledges, ",") ' 分 离 出 考试 知识 点 
amount= Ubound(point)-1 " 求 考核 知识 点 数量 
havepick ="" ' 用 于 拼接 选 好 的 试题 的 编号 ， 中 间 用 逗号 隔 开 
set rs = Server.CreateObject("ADODB.recordset ) 
for xx = 0 To amount ' 循 环 在 每 个 知识 点 选 题 


Sql = "select* fom “+table + " where difficulty=" + CStr(diff)+ 
"and knowledges_point like " & point(xx) & " ” 
rs.Open sql, conn, 1, 1 


' 以 下 程序 段 求 每 个 知识 点 预选 试题 数量 并 存 入 precount 变量 中 
if rs.EOF then 


precount=0 "无 试题 可 选 ， 则 预选 试题 数量 置 为 0 
else 
px = rs.RecordCount "知识 点 试题 总 数 


precount = Int(count1 / amount + 0.5) ”' 均 分 每 个 知识 点 预选 试题 数量 
if px < precount Then 
precount = px 
end if 
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end if 


shiti = split(genrandom(precount, px) , ",") 


"调用 例 3-6 的 函数 genrandom 产生 随机 数列 并 存 入 数组 shiti 中 


以 下 根据 产生 的 随机 数列 作为 记录 序号 从 数据 库 表格 记录 读 取 试 题 编号 
rs.movefirst 
start=rs.bookmark 
for kk =0 to precount-1 
rs.Move shiti(kk), start "移动 到 随机 数列 元 素 指定 记录 
n= rs.Fields.ltem("st_no") ' 读 取 数 据 库 中 试题 编号 字段 
havepick = havepick + CStr(n) + ",” 
next 
rs.Close 
next 
pickst = havepick 
end 并 
end function 
</script> 


【说 明 】 本 程序 在 各 个 知识 点 上 均 分 进行 选 题 ， 首 先 利 用 第 3 章 编 写 产 生 随 机 数列 的 
函数 产生 记录 编号 ， 然 后 读 取 相应 记录 的 试题 编号 。 将 所 有 选取 试题 的 编号 拼接 为 一 个 字 
符 串 作 为 返回 结果 。 由 于 选 题 函 数 在 多 处 使 用 ， 所 以 将 其 安排 在 一 个 inc 文件 中 ， 使 用 时 
用 include 语句 将 其 包含 到 具体 的 ASP 程序 中 。 

2. 组 卷 ASP 程序 
组 卷 ASP 程序 涉及 的 exam_set 表格 为 组 卷 设置 记录 表 ， 包 括 如 下 字段 。 

(1) kcname: 课程 标识 。 

(2) exam _point: 考核 知识 点 。 

(3) diff 难度 系数 。 

(4) danxuan amount: 单 选 题 数量 。 

(5) danxuan_ score: 单 选 题 每 道 题 的 分 值 。 

人 其 他 字段 ， 如 多 选 、 是 非 、 填 空 等 均 涉及 试题 数量 和 分 数 。 

以 下 为 程序 的 主要 代码 : 

<I-- #include file = "pickupst.inc"--> 

<% 

file= "database.mdb" 

Set Conn=Server.CreateObject("ADODB.connection") 

connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 

Conn.Open connstr 

' 取 得 课程 的 考试 要 求 

sql1="Select * from exam_set where kcname="&request.cookies("kcname")& 
set rs1=conn.execute(sql1) 


xzt_amount = rs1("danxuan_amount") 
diff = rs1("diff’) 
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knowledges = rs1("exam_point ) 

response.cookies("exam")("danxuan") = pickst(conn,"danxuan_table”", 
xzt_amount,knowledges,diff) ' 调 用 选 题 函 数 挑选 试题 

Se 其 他 类 试题 的 选 题 略 .……. 

response.redirect("examlist.asp") ”' 转 向 考试 内 容 显 示 页 面 

%> 


【说 明 】 该 程序 根据 考试 设置 中 各 类 试题 的 选 题 要 求 〈 包 括 选 题 数量 、 难 度 、 知 识 点 
范围 等 ) 调用 选 题 函数 ， 从 相应 的 试题 库 表 格 中 选 题 ， 并 将 选 好 的 试题 编号 保存 到 Cookie 
变量 中 ， 以 便 在 后 续 页 面 中 能 够 进行 处 理 。 


11.4.3 ”试题 显示 处 理 程 序 


试题 显示 处 理 程序 的 功能 是 根据 Cookie 变量 中 记录 的 选 题 访 问 数据 库 , 然后 将 试题 内 
容 显 示 在 框架 页 面 中 。 


-一 一 -一 一 -一 一 一 一 -一 paper_listasp 

<html><head> 

<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<style> 


.body {font:14pt 宋体 } 
.table {font:14pt; color:"black"} 
</style> 
</head> 
<body > 
<table width=99% style="table-layout:fixed"> 
<td style='word-wrap:break-word'> 
<% 
dim shiti 
file= "database.mdb" 
Set Conn=Server.CreateObject("ADODB.connection") 
connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 
Conn.Open connstr 
result = request.cookies("exam")("danxuan") 
shiti = split(result,",", 
p=Ubound(shiti)-1 
%> 
<font color="red"> 一 、 单 项 选择 题 </font> 
<br> 
<% i=0 
do while i<=p "循环 显示 各 道 试题 的 内 容 
sql="SELECT * from jvselect where st_no="&shiti(i) 查询 试题 
set rs=Conn.execute(sql) 
if not rs.eof then 
%> 
<pre><font color="blue"> 
<b><%=(i+1)%>.</b></font><%=server.htmlencode(rs("content"))%> 
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</pre> 

<% 

end if 

i=i+1 

loop%> 

Re 其 他 试题 显示 类 似 ， 这 里 省 略 …… 
</body> 

</html> 


【说 明 】 根 据 所 选 试题 编号 访问 数据 库 ， 并 显示 试题 内 容 ， 显 示 时 要 注意 两 点 ， 一 是 
用 Server 对 象 的 htmlencode 方法 对 试题 内 容 进 行 转换 , 以 便 试题 内 容 显 示 保 持原 来 的 面貌 ; 
二 是 采用 表格 设置 固定 宽度 ， 在 超出 宽度 时 让 内 容 自动 折 行 ， 这 一 点 是 通过 表格 和 单元 格 
的 样式 设置 实现 的 。 


11.4.4 ”答题 卡 显示 处 理 程序 


答题 卡 显示 处 理 程序 的 功能 是 根据 Cookie 变量 中 记录 的 选 题 数量 , 生成 答题 卡 的 解答 
控件 供用 户 解答 。 


和 -- answer_card.asp -一 -一 -一 -一 -一 一 一 一 一 -一 -一 -一 一 -一 

<html> 

<head> 

<STYLE type=text/css> 

body{ ”COLOR:blue; FONT-FAMILY: "宋体 "; FONT-SIZE: 12pt} 

TABLE { COLOR:black; FONT-FAMILY: "宋体 "; FONT-SIZE: 10pt } 

</STYLE> 

</head> 

<body> 

<center> 

<big> 答 题 卡 </big> 

<form name="my" method="post" target="_top" action="exam_remark.asp "> 

<% 

dim shiti ' 用 来 存放 试题 的 数组 

result = request.cookies("exam")("danxuan") ' 获 取 选 好 的 试题 编号 序列 

shiti= split(result,",") ' 将 试题 编号 存 入 数组 shiti 中 

%> 

<font color="red"> 一 、 单 项 选择 题 </font> 

<br> 

<table width="100%" border="0"> 

<% 

i=0 

p = ubound(shiti)-1 

do while i<=p "循环 产生 各 道 试题 的 选项 
%> 

<tr> 

<td align="left"><font color="blue"><b><%=(i+1)%>.</b></font> 

<% "以 下 生成 一 道 试题 的 5 个 选项 的 解答 控件 
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fort=1to5 

id = mid("ABCDE",t,1) "选项 的 标识 

name="sx"&i "解答 选项 的 名 称 ， 以 sx 作为 前 绥 
%> 


<td align="left"> 

<input type="radio" name=<%=name%> value=<%= id %>><% = id %></font> 
</input> 

</td> 

<% next %> 

</tr> 

<% 

i=i+1 "下 一 道 题 

loop %> 

</table> 

2 其 他 类 试题 的 答题 卡 显示 处 理 类 似 ， 此 处 略 …… 

<br> 

<input type="submit" name="my" value=” 交 卷 "> </input> 
</form></center> 

</body> 

</html> 


【说 明 】 答 题 卡 的 显示 与 试题 内 容 无 关 ， 而 只 与 试题 数量 产生 和 每 道 试题 对 应 的 解答 
控件 有 关 。 要 给 每 个 试题 进行 编号 ， 解 答 控件 的 命名 很 重要 ， 在 后 续 页 面 中 将 根据 解答 控 
件 读 取 对 应 试题 的 学 生 解答 。 单 选 题 控 件 的 命名 采用 前 绥 sx 加 试题 序号 的 方法 。 


11.4.5 ”交卷 评分 显示 处 理 程序 


交卷 评分 显示 处 理 程序 将 用 户 的 解答 与 标准 答案 进行 比较 ， 并 根据 数据 库 中 保存 的 每 
小 题 分 值 计 算得 分 。 另 外 ， 该 程序 要 做 的 工作 还 包括 记录 学 生 的 得 分 以 及 记录 学 生 考卷 、 
解答 情况 等 信息 ， 为 了 节省 篇 幅 、 突 出 主线 ， 这 部 分 内 容 在 程序 中 省 略 。 需 要 注意 的 是 ， 
以 下 代码 中 仅 包 括 单 选 题 的 评分 处 理 部 分 ， 而 其 他 试题 的 评分 处 理 部 分 省 略 了 。 


Score=0 

file= "database.mdb" 

Set Conn=Server.CreateObject("ADODB.connection") 
connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath(file) 
Conn.Open connstr 

"取得 课程 的 考试 评分 

Sql ="Select * from exam_set where kcname="&request.cookies("kcname ")&"”” 
set rs1=conn.execute(sql) 

score1=rs1("danxuan_score") ' 单 选 题 的 每 小 题 分 值 

ene 其 他 类 试题 的 每 小 题 分 值 省 略 .………- 

%> 

<html> 

<head> 
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<script language="javascript"> 
function check (x){ 
if (x>=90) { 
alert(" 你 的 得 分 : “+x+"\n 祝贺 取得 优异 成 绩 !! "); } 
else if (x<90 && x>=80) 
{alert(” 你 的 得 分 : “"+x+"\n 考试 成 绩 不 错 ! "); } 
else if (x<80 && x>=70) 
{alert(” 你 的 得 分 : "+x+"\n 考试 成 绩 尚 可 ! "); } 
else if (x<70 && x>=60) 
{alert(” 你 的 得 分 : “+x+"\n 考试 成 绩 一 般 ，\n\n 还 需要 不 断 进步 人"); } 
else if (x<60) 
{alert(” 你 的 得 分 ，“"+x+"\n 希望 你 加 信和 努力 学 习 !");} 
window.location = "student_do.asp "; /返回 学 生 操 作 主 界面 
} 
</script> 
</head> 
<body> 
<% ”以 下 首先 对 单 选 题 进行 评分 处 理 
dx=request.cookies("exam")("danxuan") ' 考 试用 到 的 单 选 题 编 号 序列 
shiti=Split(dx,",”") "将 单 选 题 编号 存 入 数组 中 
amount = Ubound(shiti)-1 
i=0 
do while i<=amount 
sql="SELECT * from jvselect where st_no="&shiti(i) 
set rs=Conn.execute(sql) 


x=rs("answer") "获取 标准 答案 
rs.close 
y = request.form("sx"&i) "' 读 取 用 户 解答 
if x=y then 

Score=score+score1 "统计 得 分 
end if 
2 


<script ee 
check(score); /提示 用 户 得 分 

</script> 

</body></html> 


【说 明 】 评 分 结果 通知 学 生 是 以 弹出 对 话 框 的 方式 进行 的 , 之 后 将 页 面 的 URL 重 定向 
到 学 生 操 作 的 主页 面 。 如 此 ， 可 防止 学 生 用 浏览 器 的 “ 回 退 ”按钮 返回 到 测试 界面 。 


本 章 小 结 


本 章 选择 网 上 教学 中 的 4 个 典型 应 用 进行 介绍 ， 这 4 个 应 用 代表 了 不 同 的 特色 。 单 元 
测试 是 在 浏览 器 客户 端 访 问 XML 试卷 实现 动态 交互 处 理 的 应 用 ， 导 航 菜单 的 应 用 则 代表 


第 11 章 ”网络 教 学 综合 应 用 实例 “263。 


了 客户 端 技术 与 服务 器 端 技术 的 结合 ， 综 合 利用 了 客户 端 技术 和 服务 器 端 技术 改进 应 用 效 
率 。 最 后 介绍 的 考试 系统 虽然 只 是 实际 系统 的 简化 描述 , 但 从 中 可 发 现 各 类 技术 的 综合 应 用 。 


习 是 


1. 参照 网 上 答疑 系统 设计 实现 网 上 作业 系统 的 功能 。 要 求教 师 可 布置 作业 ， 学 生 可 解 
答 作业 ， 教 师 可 批改 作业 ， 学 生 可 查看 教师 的 批改 意见 。 

2. 设计 一 个 网 上 家 教 园 地 , 分 为 家 庭 教师 账户 和 学 生 账 户 , 包括 首页 、 家 教 注册 模块 、 
学 生 注册 模块 、 家 教 信息 浏览 模块 、 学 生 信息 浏览 模块 、 家 教 个 人 信息 管理 模块 、 学 生 个 
人 信息 管理 模块 等 。 将 模块 功能 划分 到 账户 。 

3. 设计 一 个 新 闻 发 布 系统 ， 分 为 管理 员 和 普通 用 户 两 类 ， 管 理 员 可 录入 、 删 除 、 修 改 
新 闻 ， 而 普通 用 户 可 查看 新 闻 。 查 看 新 闻 先 列 新 闻 标 题 、 点 击 标题 列 出 新 闻 详 细 内 容 ， 热 
点 新 闻 和 最 近 新 闻 排 列 在 前 面 显示 。 点 击 次 数 多 的 为 热点 新 闻 ， 另 外 ， 支 持 分 页 显示 和 模 
糊 查 询 新 闻 的 功能 ， 用 户 还 可 对 新 闻 进 行 投票 。 

【提示 】 数 据 库 表格 包括 3 个 表 ， 第 一 个 是 用 户 信 息 表 ， 可 包括 登录 名 、 密 码 、 角 色 、 
姓名 等 字段 ， 第 二 个 是 新 闻 表 ， 可 包括 新 闻 标题 、 编 号 、 新 闻 内 容 、 发 表 时 间 、 点 击 次 数 
等 字段 ， 第 三 个 表 是 新 闻 投票 记录 表 ， 包 括 新 闻 编号 、 投 票 等 级 、 投 票 者 等 字段 。 

4. 设计 一 个 简单 网 络 考试 系统 。 分 为 教师 、 学 生 两 类 用 户 。 

教师 操作 部 分 的 功能 包括 如 下 方面 : 

(1) 可 管理 试题 库 中 的 试题 ， 假 设 试题 库 中 只 包括 单 选 题 。 

(2) 考试 安排 ， 如 抽 题 数量 、 考 试 时 间 限 制 等 。 

(3) 查看 所 有 学 生 考试 成 绩 。 

(4) 清除 本 次 考试 成 绩 。 

学 生 操作 部 分 的 功能 包括 如 下 方面 

(1) 参加 考试 ， 系 统 随 机 抽 题 ， 考 试 完毕 后 系统 记录 学 生成 绩 。 

(2) 查看 所 有 学 生 的 考试 成 绩 。 

5. 以 下 代码 是 网 络 教学 系统 中 实现 考试 限时 处 理 代码 的 简化 版 , 仔细 阅读 代码 的 实现 
并 为 书 上 介绍 的 单元 自 测 应 用 增加 限时 功能 ， 到 达 时 间 后 自动 交卷 。 


<SCRIPT language="JavaScript"> 


var limit; /考试 限时 值 〈 单 位 为 分 ) 
var now; // 现 在 时 间 
var t1; // 记 录 考 试 开 始 时 间 ， 折 算 为 秒 
function init(){ 
limit=100; /假设 考试 限时 100 分 


now=new Date(); 
t1=now.getHours()*3600+now.getMinutes()*60+now.getSeconds(); 
computetime(); 

} 

function computetime(}{ /计算 并 显示 剩余 时 间 ， 时 间 用 完 后 自动 交卷 
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now=new Date(); 
b2=now.getHours(); 
m2=now.getMinutes(); 
s2=now.getSeconds(); 


passtime=b2*3600+m2*60+s2-t1; // 计 算 当 前 时 间 与 考试 开始 时 间 差 
remain=limit*60-passtime; /1/ 计 算 剩余 时 间 ( 秒 ) 


remainhour=Math.floor(remain/3600); 
remainminute=Math.floor((remain-remainhour*3600)/60); 
remainsec=Math .floor(remain-remainhour*3600-remainminute*60); 
if (remain<=0) { 
parent.frames("right").document.my.submit(); // 自 动 交卷 
} 
else{ 
str=" 考 试 剩余 时 间 : <font color=red>"+remainhour+"</font> 小 时 :" 
str=str+"<font color=red>"+remainminute+"</font> 分 :" 
str=str+<font color=red>"+remainsec+"</font> 秒 "; 
document.all.me.innerHTML=str; 
setTimeout("computetime()",1000); 
} 


} 

</SCRIPT> 

<body onload="init()"> 
<div id="me"></div> 
</body> 


实际 应 用 的 运行 结果 如 图 11-9 所 示 。 
【说 明 】 此 时 的 剩余 时 间 显 示 缺 少 很 多 防范 措施 ， 如 学 生 修改 系统 时 间 ， 学 生 单 击 刷 
新 按钮 等 均 将 导致 计时 不 准 ， 如 何 修改 程序 防范 这 些 问题 ? 
【提示 】 防 范 学 生 修 改 时 间 就 要 设法 记 住 时 间 ， 防 止 学 生 刷 新 就 要 设法 将 剩余 时 间 记 
住 。 利 用 Cookie 是 一 个 办 法 ， 上 网 查阅 如 何在 客户 方 用 JavaScript 读 写 Cookie。 
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